I J r r 



•-. I I .-' I r~ h 1 1-.. I r~ n 
j I ! |--~ rx r_ I -•..] I --J r_ r^. 



L '. "h E' ! 0. 0- T" U 0 f") ' J J 




INFORMATIE . 



Het bestuur. 



De 6502 Kenner is een uitgave 
van de KIM Gebruikersclub 
Nederland. Deze vereniging is 
volledig onaf hankeli jk^ is 
statutair opgericht en inge- 
schreven bij de Kamer van 
Koophandel en Fabrieken voor 
Hollands Noorderkwartier te 
Alkmaar, onder nuininer 634305. 

Het doel van de vereniging is 
het bevorderen van de kennis- 
uitwisseling tussen gebruikers 
van computers die zijn opge- 
bouwd rond een microprocessor 
uit de 6500-f amilie . Voor- 
beelden hiervan zijn onder 
andere: Elektuur EC-65, 

Commodore 64, Apple 3C , 
Elektuur Junior, Atari 600 en 
800. 

De eerder genoemde kennisuit- 
wisseling komt onder andere 
tot stand door 6 maal per jaar 
de 6502 Kenner te publiceren, 
door de organisatie van lande- 
lijke bi jeenkomsten voor de 
leden en het instandhouden van 
een sof twarebibliotheek op 
cassette, floppy disk en 
papier . 

Verschi jningsdata : 

De 6502 verschijnt op de derde 
zaterdag van de maanden 
f ebruari , april, juni, 

augustus, oktober en december. 

Landeli jke bi jeenkomsten : 

Deze worden gehouden op bij 
voorkeur de derde zaterdag van 
de maanden januari, maart, 
mei, September en november. De 
exacte plaats en datum worden 
steeds in De 6502 Kenner 
bekend gemaakt in de rubriek 
Uitnodiging. 



Het bestuur bestaat uit de 
voorzitter, secretaris en 
penningmeester , die samen het 
dagelijks bestuur vormen. 
Verder hebben thans vijf leden 
in het bestuur zitting. 

Voorzitter : 

Rinus Vleesch Dubois 

Florence Nightingalestraat 212 

2037 NG HAARLEM 

Telefoon 023-330993 

Secretaris : 

Gert Klein 

Diedenweg 119 

67 06 CM WAGENINGEN 

Telefoon 08370-23646 

Penningmeester : 
John van Sprang 
Tulp 71 

2925 EW KRIMPEN A/D IJSSEL 
Telefoon 01807-20589 

Leden : 

Willem van Pelt 

Jacob Jordaenstraat 15 

2923 CK KRIMPEN A/D IJSSEL 

Telefoon 01807-19881 

Adri Hankel 
Willem Kloosstraat 32 
7606 BB ALMELO 
Telefoon 05490-51151 

Erwin Visschedijk 
Dillelaan 11 
7641 CX WIERDEN 
Telefoon 05496-76764 

Gert van Opbroek 
Bateweg 60 
2481 AN WOUBRUGGE 
Telefoon 01729-8636 

Nico de Vries 

Mari Andriessenrade 49 

2907 MA CAPELLE A/D IJSSEL 

Telefoon 010-4517154 
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Naast het bestuur zijn er een aantal 
ereleden, die zich in het verleden 
bijzonder verdiensteli jk voor de 
club hebben gemaakt: 
Erevoorzitter : Siep de Vries 
Ereleden: Mevr. H. de Vries-van der 
Winden en Anton Mueller 

De 6 502 Kenner is een uitga^ra 
van de KIM Gebruikersclub Ne- 
der land. Het blad wordt bij 
verschijnen gratis aan alle 
leden toegezonden. De kopij 
voor het blad dient bij voor- 
keur van de leden afkomstig te 
zijn. Alle kopij wordt door de 
redactie op bruikbaarheid en 
publicatiewaarde beoordeeld . 
Deze twee criteria^ in pamen- 
hang met de actualiteit, be~ 
palen of een stuk al of nlet, 
en zo ja, wanneer het gepubli- 
Geerd wordt. De redactie 
streeft ernaar de kopij zoveel 
mogelijk in de oorspronkeli jke 
vorm te plaatsen. In principe 
wordt Nederlandstalige kopij 
niet vertaald naar een andere 
taal; indien de schfijver ook 
anderstaligen wenst te berei- 
ken, wordt hem aangeraden de 
kopij van een samenvatting in 
een tweede taal te voorzien. 
De redactie streeft ernaar, 
■mmi Nederlandstalig blad te 
maken . 

Belaas kan de redactie, noch 
het b^etmir, enige aansprake- 
lijkheid aanvaarden voor de 
toepassing(en) van gepubli- 
ceerde fec^ij. 

Software Coordinatie. 

Indien uw software heeft ge- 
schreven voor een systeem, is 
het verstandig dit naar de 
sof twarecoordinator voor dat 
systeem te sturen. Hij zorgt 
ervoor, dat wm software wordt 
gecatalogiseerd, en geschikt 
gemaakt wordt voor verdere 
distrlbutie, Uw ontva»f|fc uw 
schijf of cassette n^tfwrlijk 
retour . 



Elektuur EC-65(K) en iJUliicw 

met OHIO OS-65D: 

Vacant 

Elektuur Junior (cassette): 

Vac^agtrt 

DOS-65 (ook Junior): 
Erwin Visschedijk 
Dillelaan 11 
7641 CX WIERDEN 



Kopij inzenden* 

In principe kan kopij in elke 
vorm naar de radiaetie gestuurd 
worden. Het onderwerp is ge- 
heel vrij^ het moet echter wel 
met computers of hun toepas- 
sing te maken hebben. 
Om redenen van efficiency 
geef t de r^dacrtie er de voor- 
keur aan, kopij te ontvangen 
in een vorm die per computer 
verwerkbaar is. Dit verhoogt 
de kans op publicatie, en 
geeft de redactie meer moge- 
lijkheden voor een nette op- 
maak, etc. Op dit moment kan 
4^ redactie de volgende media 
lezeB mi trerwerken: 

EC-65, 40 track 5-25" disk 
Elektuur Junior cassette tape 
DOS-65, 40/80 tr. 5.25'' disk 
Apple 3C CP/M 
MS-DOS, 360k 5.25- disk 

De volgende tekstverwerker- 
formaten teoaeia verwerkt 
worden: 

MS-DOS: WordStar 3.30^ 

WordPerfect 4.1 en 4.2 
Appl^ CP/M: WordStar 3.0 

Voor de andere informatie- 
dragers is een zogenaamde 
schone ASCII-file het gemak- 
kelijkst. Een file is een 
schone ASCII- file^ als hij 
zonder meer op uw scherm of 
printer kan worden afgedrukt 
zonder tussenkomst van een 
programma . 
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11 mmi mdhtjf of cas- 
sette inzendt^ dan streeft de 
redact ie ernaar u die schijf 
op korte termijn te retour- 
neren. Ook hoopt de redactie u 
te belonen met wat extra's op 
die schijf* 

Zoals vanouds blijft kopij op 
papier natuurlijk ook welkom! 

Uw kunt al uw kopij, in welke 
vorm dan ook^ altijd sturen 
aaa: 

Qert wmi Opbroek 

Bat ewe g 60 

2481 AN WOUBRUGGE 



gesteld dat bij gebruikmaking van 
deze meerderheid door middel van 
volmachten om W. van Pelt in zijn 
functie van redact^mr te herst^l#fi^ 
het voltallige bestuur zou aftreden. 

Zover is het echter niet gekomen. 
De heer C. Boltjes heeft gmm^ 
optimaal gebruik kunnen maken van de 
aan hem toevertrouwde volmachten • 
Naar mil© iimaiir^chi jnlijkheid om de 
volgende twee redenen: 
le. Een grote meerderheid van de 
aanwezige leden stemden tegen 
C. Boltjes en zijn 

medestanders . 
2e. C. Boltjes en zijn iiBtiteife^adters 
zouden bij terugkeer van W. van 
Pelt de 
bestaiitrsveraittii^ op 
zich hebben moeten nemen. 
Naar onze mening heeft vooral het 
laatste pint de hear liplit j#p mr 
van weerhouden voet bij 0tMk te 
houden . 



Van het bestuur > 

Nog even een terugblik en dan.... 
voorwaarts! Ja, we hebben als 
bestuur geleerd en zeker tijdens de 
in Almelo gehouden ledenvergadering . 
De affaire 'redactie' is daar 
uitvoertg aan de orde gmmmsmt.^ Bet 
bestuur heeft een toelichting 
gegeven op het waarom van het naar 
hnis sturen van de redacteur. 

De heer Coen Boltjes trad op als 
woordvoerder voor diegenen die W. 
van Pslt: graag in zijn oude functie 
als redacteur zagen terugkomen. De 
medestanders van woordvoerder Coen 
Boltjes itasfeonden hoofdzateBlljk uit 
door de heer C. Boltjes aange- 
schreven^ in het buitenland 
woonacli% igfe ^ leden . 

Door de zeer geringe opkomst van de 
leden ontstond de situatie, dat de 
heer G* Boltjes met de hem gegeven 
volmachten zelfs een meerderheid had 
kunnen behalen. Het bestuur heeft 



Nu vooruit! Hoe vond u bijvoorbeeld 
de leesbaarheid en de nieuwe lay-out 
-mm de laaf:sib# 6502 Refiners f 

Het bestuur heeft er weer veel zin 
in^ mede dankzij het aanblijven als 
penningmeester van de heer J* van 
Sprang^ die, en dat mag best wel 
eens gezegd worden, de centjes 
uitstekend beheert en T^glig^are#rt . 

Inmiddels heeft zich een nieuwe 
redacteur aangediend in de per soon 
van drs. Gmrt van Opbroek. Gert, 
namens het bestuur en de leden 
wensen we je veel succes. Ook mogen 
we de inniiddels ook gevonden 
operator voor het te starten 
bullet inboard niet vergeten: Jacques 
Banser. Ook jou Jacques wensen ^e 
veel succes toe. 

De eerste redaqtioaele inzc^nding op 
floppy disk is inmiddels ook hiim^! 
Bij deze roepen wij de bezitters van 
de Octopus /EC-65 machines op, om 
meer kopij in te sturen. De redactie 
wil nameli jk graag een blad maken 
waar iedereen wat aan heeft # 

Tenslotte wensen wij een ieder 
fijne feestdagen toe. Tot de 
volgende bijeenkomst in Krommenie . 

Namens het bestuur ^ 

R. Vleesch Dubois . 
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UITNODIGING, 

Uitnodiging voor de landelijke 
bijaenkowst c>p B^erdag 16 jlM&mEt 



nieuwe kantiiie FORBO- 
Industrieweg 12 

1566 jp asiiiirosLiT 

TelefcMt 075-291911 



Routebeschri j ving : 

Per autOy komende uit de richting 
Ainsterdain: 

Coentunnel door^ en 

Coent unne Iweg he 1 emaal 

afrijden. Aan het einde 
* xechtsaf (water aan de 
Ixilkerzijde) . Dan de le afslag 
rechtsafr richting Uitgeest- 
Alkmaar. Doorrijden tot aan 
stoplichten. Linksaf de 

spoorbaan over. Na 75 meter 
linksaf: Industrieweg. Links 
aanhoudende kcmt men dira op het 

per auto^ komende uit dig richtxng 



gastheer Co Flliner* 
Nieuwe diashow. mm3^ 
FORBO-Krommenie . 
10.30 - Behandeling Jaarvarslag 
1987. 

10.45 - Koffiepauze. 

11.00 - Gert Klsin houdt ean 
spreekbeurt over het 
nieuwe bulletinboard . 

12.00 - Lunch ^ aangebodaii door 
FORBO-Kroiranenie . 

13.00 - Forum, aansluitend Markt. 

13.15 - Inf omiee 1 gedee 1 1 e , 

bedoeld om kennis, 

ervaring en Public Domain 
software iiit t^e #iiiiielen 
met uw medeleden. 
BRENG DAAROM OOK UW EI GEN 
SYSTEEM MEEM 

(En vergeet de snoeren 

niet ) 

17.00 - Sluiting. 



ENTREE: fl. 10.- 



Snelweg Alkmaar-Haarlem. Afslag 

Uitgeest-Zaandam. Bij kruising 
linksaf. Bij 3e stoplichten 
rechtsaf, de spoorbaan over. Na 
75 meter linksaf: Industrieweg. 
Links aanhoudende komt men dan 
op het FORBO-terrein. 

Per trein: 

Station Krommenie-Assendelf t . 
Rechtsaf tot av^er spoorbomen. 
Na 75 meter linksaf: 

Industrieweg. Links aanhoudende 
komt men dan op het FORBO- 
terrein. 

PROGRAMMA: 

09.30 - Zaal open. Ctetv^angst met 
koffie. 

10.00 - Opening door de 

voorzitter en 
verwe 1 komi ng door de 



Vraaq en Aanbod. 
Te kopp: 

6502 Elektuur CPU-kaart 
Floppy disk controllerkaart 
Elektuur VDU-kaart 
Elektuuar 0tatische RAMkaart (2) 
Eigenbouw geheugenkaart 
Eigenbouw I/O kaart 
5.25" disk drive (met 
manuals / i^cheH^a ' s ) 
19 inch kast 
Monochroom monitor 
Een hoop document a tie 

Prijs: t .e.a.b. 

Te bevragen onder: 

Telefoon 01899-22460 (na 18.00 uur) 



Aansluiten 
op DOS65w 



van een IBM toetsenbord 



Door 2 

WMM Sc h inline 1 

Calslaan 28b-62 

tetli 053-895040 



Vooralsnog was het 
niogelijk een IBM 
toetsenbord aan te 
DOS65 SfBteem* Dit 
geniaalit. 

1 Het probleem 



niet zonderineer 
( -compatible ) 
sluiten op het 
is nu niogelijk 



Een IBM toetsenbord wijkt nogal 
af van de gebruikeli jke ASCII 
parallel toetsenborden . De verschil- 
len zijn: 

— Sjfn^hrone serie le oixtpiat 
(zie figuur 2) 
- Geen ASCII output maar een 
toetswaarde ( =''scan-code" ) 
output/ plus een extra bit 
dat aangeeft of de toets 
wordt ingedrukt of losge- 
laten. B.v. het indrukken 
van de ESCAPE toets gee ft 
de coda 01/ het weer 
loslat^n code 81 . (zie 
voor de scan-code figuur 

H 

2 De oplossingen 

De volgende drie Qplossingan 

zijn qGMcmdmmt 

1) Volledige hardware aanpassing. 

voors - Eenvoudige software 
aanpassing / simpelweg 
inpluggen van het IBM 
toetsenbord en klaar, 

wmt - Een zeer uitgebreide 
{mm dum) scJ:iak@lii]^^ 

2) Serieel/Farallel aanpassing 
d.m.v. een ACIA en de toetjs- 
vertaling sof twarematig. 

voox: ^ De m^tmmtm is 
slechts een eenvoudig 
"tabel-progranuna" . 
Er is een 1 karakter 
buffer, dus er hoeven 



geen toetsen te 
worden gemist. 
tmt - Geen kant en klare 
ACIA op de markt die 
het vreemde sitfniial 
kan inlezen en een 
TTL schakeling wordt 
veel te complex. 

3) Volledige software aanpassing. 
Dus een progranuna die het 
serie le signaal inleest en 
vertaald naar ASCII, 
voor: - Zeer f lexibel. 

- Geen hardware . 
na: - Geen 1 karakter 
buffer / zodat het kan 
voorkomen dat er een 
toets wordt gemist. 

Ondanks het vervelende nadeel is er 
toch gekozen voor het derde alterna- 
tief. Mede ter voorkoming van 
harc^are probijig»gtii* 

4 Uitwerking van de opiossing 

Ook de opiossing is gesplist in 
de twee problemen, we beginnen met 
het sarie le probleem. 

4*1 Serieel 

De DOS 6 5 invoer werkt op 
interrupt basis. Bij een interrupt 
wordt in een routine gesprongen die 
de toets uit de VIA haalt en in een 
-toets buffer" plaatst. Zodra de 
toetsen nodig zijn worden ze uit die 
buffer gehaald en verwerkt. Hoe het 
IBM toetsenbord moet worden aange- 
sloten staat in figuur 1. 

DATA ^ — ^w-.^^ ^ p|^7 



CLK 



CAl 



figiMr I. Aansluiting van het 

toetsenbord aan VIAl. 

Op een negatieve flank van CAl 
wordt een interrupt gegenereerd* 
Zodra naar de interrupt routine is 
gesprongen wordt begonnen met het 
sof twarematig schuiven van de bits. 
Probleem is mi, dat te laat naar de 
interrupt routine kan worden 
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gesprongen (later dan 560us) zodat 
er bits worden gemist. In de 
omzettings routine moet een "time- 
Gut" procedure worden toegeir^gd om 
het "oneindig" wachten op bits die 
verloiraii zijn gegaan te voorkomen. 

4*2 Toetswaarden 

Elke toets van het toetsenbord 
geeft een code af (zowel bij maak 
als bij verbreek). Dit geldt ook 
voor de toetsen SHIFT, CONTROL, ALT> 
GAPSLGCK en NUMLOCK. De ASCII 
waarden van toetsen is echter wel 
afhankelijk van de "toestand" van 
deze e^nl-role toetj^en. Daarom is een 
toestandregister gebruikt, dat 
bijhoudt of deze controle toetsen in 
de actieve of non-actieve toestand 
zijn. Voor de omzetting van de 
toetswaarden naar ASCII waarden 
wordt ^^Mik gemaakt van 3 tabellen 
namelijk de ASCII-, SHIFT- en 
NUMLOCK-tabel. De ALT toets is (nog) 
niet ge mplementeerd (in de zin van 
andeir^ eodes altfeans ) . 

5 Listing 

De listing van het prograinina 
zai nu waarsehijnli jk weinig 
vraagtekens oproepen. Duidelijk is 
wel de enorme f lexibiliteit van het 
geheel, daar het prograinma op schijf 
staat. Wil men een andere tabel of 
een ( uitgebreider ) programma dan kan 
dit s impel wG£#iii ^TiSiraii^ Bij het 
opbooten wordt het progjraiTO^f via 
login. com, ingelezen en gestart . 

6 Aanpassingen aan 1065 

De veranderingen in de 1065 
EPPOM zijn zeer gering. De enige 
verandering die moet worden aange- 
bracht is dat niet op de letft«r B 
moet worden gewacht, maar op een 
willekeurige toets (of beter gezegd: 
op een negatieve flank op CAl). 
Aangezien het toetsenbord programma 
nog niet geladen is zal de 1065 
nodit een ASCII B kunnen lezen op 
poort A van 4m VIA, maar wel de CAl 
interrupt I 



7 Aanpassinqen utility software 

Voorlopig is alleen de EDITOR 
aangepast , dankzij de elibifiEii^ 
f lexibiliteit van het EDITOR 
programma zijn de veranderingen zeer 
eenvoudig . De file ^VbmmMm^.wmm'* 
bestaat uit allemaal tabellen. In 
deze tabellen staat aangegeven welk 
commando bij we Ike toets hai>rt • Een 
tabel is alsvolgt opgebouwd: 

fee ascii-code , tabel-off set 

Wil men nu ASCII-waarde $08 (BS) als 
DELETE laten fungeren, dan ziet het 
er dM0 uit: 

fee $08, offset-delete (=48) 

Wat die tabel offset is kun je 
vinden in de nu al bestaande tabel 
en blijft gewoon staan. De file 
'ibmeddcmd.mac' bestaat uit twee 
soorten tabellen, namelijk de 
directe en de second tabellen. De 
directe codes zijn voor toetsen 
waarbij control tegelijk ingedrukt 
is, de secondcodes zijn voor de 
toetsen in een escape sequence. Is 
op deze manier ' ibmeddcmd . mac ' 
aangepast, dan start je het commando 
'makeed' die een nieuwe (aangepaste) 
EDITOR gegenereerd. Deze moet dafi 
alleen nog naar de systeemschi jf 
worden gecopieerd en klaar is de 
nieuwe EDITOR. 

N.b.: Van de files makeed en 
ibmeddcmd .mac is ook een listing 
af gedrukt . 

*********************************** 

MAKEED is een command- file die de 
bestaande editor ombouwt , zodat van 
IBM-like toetsenbord de cursortoet- 
sen e.d. gebruikt kunnen worden. 
Roep MAKEED als commando aan. De 
optie c moet wel met 'setmode -c 
MAKEED' gezet zijn. Copieer eerst de 
EDITOR van de systeemschi jf naar de 
user drive onder de naam EDITOR. DPT. 
De nieuwe EDITOR zal dan ook op de 
user drive worden aangemaakt . 
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ECHO Assembling ed cOBimands file. 
AS IBMEDDCMD 

ECHO Loading the binary files. 
LO EDITOR. DFT 
LO IBMEDDCMD.BIN 

ECHO Appending the binary files. 
SAVE -B EDITOR 1000, 2FFF 
SAVE -A EDITOR 400, 4FF 

BMm -A BoiT(M m^,we^ 

SAVE -A EDITOR 580, 5FF 

SAVE -A EDITOR 700, 7 FF 

SETMODE -C EDITOR 

RENAME EDITOR TEMPORY 

RENAME TEMPORY ED$ITOR 

ECHO Copy file EDITOR from the user 

ECHO drive to your system diskette. 

ECHO First try this editor version 

ECHO by typing mm4 fEUmmmmJ <ret> 



3 

o 

m 

CD 



OJ 



o 

III 



3 

o 



U 



L 
O 

c 
tu 

tA 

Qj 

o 

z: 
m 



c 



> 
3 

a 
a 



3 



o 



O 



<7' 



CO 



in 



o 



-J 

b 



a. 



8 



3 

z 



U 

u 



ON 



00 



U-1 



CO 



OJ 



o 



0S 



O'J 



OJ 



LJ 

u 



(Li 
-P 

r- 

lD 



OJ 



□ 



in 



[cu 



OJ 



OJ 
OJ 



UJ 



OJ 



OJ _ 



( 1 



in 

CO 



UJ 



in 



in 



CO 
CO 



OJ 
CO 



07 



o 



U 
OJ 



CU 



OJ 



bJ 



CO 



'.£1 



CO CO 



Li- 

CO bl 



CO 



OH 



OJ 



OJ . , 



OJ 



-^C -4-' 
Oj u- 



OJ 



03 



U1 

c 



u 
o 
_J 

m 

Cl 



ro 



9 



I I I 



rx r I • 



I f-. 



r 



J 1 1 



; File IBM. MAC 

; Datum: 23 oktober 1986 
f 

; IBM toetsenborci vertaler 

; Dit prqgpraima be#1:ayirfc tilt 3 deleny te we ten 

; 1) Imitikalisatie routine 

; 2) Interrupt routine ( sequentieel-> parallel) 

; 3) Toetswaarde naar ASCII vertaler 



AOOO 


initorg 


equ 


$aOOO 




BDOO 


introrg 


@qtt 


$bdOO 




ElOO 


vial 


equ 


$elOO 




ElOl 




equ 


via 1+1 


Data poort ft 


E103 




equ 


vial+3 


Data direction poort A 


ElOB 


vialacr 


equ 


vial+11 


Auxilary control register 


ElOC 


vialpcr 


equ 


"^ial+lZ 


Peripheral cc>ffi%»ol register 


ElOD 


vialif r 


equ 


vial+13 


Interrupt flag register 


ElOE 


vialier 


equ 


vial+14 


Interrupt enable register 


E7B7 


keypnt equ 


$e7b7 






CB2B 


conint equ 


$cb2b 






AOOO 


org 


initorg 





AOOO 


08 




ibm 


php 






AOOl 


78 






sei 




Disable interrupts 


A002 


AD 


03E1 




Ida 


vialadd 


Poort PA7 en PA)6 ingang 


A005 


29 


3F 




and 


#%00111111 




AO 07 


8D 


03E1 




sta 


vialadd 




AOGA 


AD 


OCEl 




Ida 


vialpcr 




AOOD 


29 


FE 




and 


#%11111110 


Negatieve flank CAl 


AOOF 


09 


OE 




ora 


#%00001110 


Set CA2 hoog 


AO 11 


8D 


OCEl 




sta 


vialpcr 




A014 


AD 


OBEl 




Ida 


vialacr 




A017 


29 


FE 




and 


#%11111110 


Geen input latch 


A019 


8D 


OBEl 




sta 


vialaer 




AOIC 


A9 


82 




Ida 


#$82 


Interrupt mogelijk van CAl 


AO IE 


8D 


OEEl 




sta 


vialier 




A021 


A9 


00 




Ida 


#0 


Reset variabelen 


A023 


8D 


6ABE 




sta 


tstnd 




A026 


8D 


B7E7 




"Sta 


keypnt 




A029 


A9 


20 




Ida 


#$20 


jsr inter- 1 


A02B 


8D 


2BCB 




sta 


conint 




A02E 


A9 


FF 




Ida 


#(inter-l)&255 


A030 


8D 


2CCB 




sta 


conint+ 1 




A033 


A9 


BC 




Ida 


#( inter- 1)»8 




A035 


8D 


2DCB 




sta 


conint+2 




A038 


28 






pip 




Enable interrupts 


A039 


60 






rts 








BDOO 




org 


introrg 




BDOO 


AD 


OlEl 


inter 


Ida 


vialpad 


Reset irq CAl 


BD03 


A9 


02 




Ida 


#$02 


Disable interrupts van CAl 


BD05 


80 


OEEl 




sta 


vialier 




BD08 


20 


30BD 




jsr 


flank 


Sla eerste bit over 


BDOB 


FO 


IB 




beq 


f out 





lO 



n^^KENNER DDSd5 CORNER 



)0D A,9 


-80 




1 Ha 
XQcL 


# 9 O U 




yov 








tinp 


)12 


20 


30BD 


1 


jsr 


-FT ranlr 




)15 


FO 


11 




beg 




-Jur^CS^'Sa XIX C?!!': X-^^Silf'fS jU X XCi'^, 


)17 


AD 


UlEl 






V XaXpaCJ. 


)1A 


OA 






cisla. 






)1B 


6E 


6BBE 




XT o x 


I^Jlip 




)1E 


90 


F2 




bcc 






)20 


AD 


oBBfc 




1 A SI 
XGIcl 


tinp 




)23 


ZU 


4Ui3U 




• 


ascxx 


VC^X l^d-CLX L- w t; O IICLCL J_ XAO J. JL 


)zb 


Q n 


no 

UZ 






^ n 1 




Q 

-Jz O 


t) o 






Tiki 




M^eni het 1 aatste teiriiolc©oradr(BS 




o 
DO 












jZA 


A2 


82 








Enablii^ iit:fc#lf£liDts v^an CA^l 


)2C 


8E 


OEEl 




o 4~ "v 


V XGIX A-XiJL 




32F 


fx n 






rts 




Reset €M. flag 




AD 


OlEl 


flank 


Ida 


vialpad 


D33 


A2 


46 




Idx 


#700/10 


Maximaal 700us geen f laiilc 


D35 


A9 


02 




Ida 


#%00000010 


anders time-out 


337 


2C 


ODEl 


1 


bit 


vialif r 




33A 


DO 


03 




bne 


2.f 




D3C 


CA 






dex 






D3D 


DO 


F8 




bne 


l.b 




D3F 


60 




2 


rts 




( z^ls tiiorte-out ) 








; File 


ASCII. MAC 





Date : 22 oktober 1986 



ASCII converter voor IBM 

; Het prograinina ascii vertaald toetswaarden 

; uit een IBM toetsenbord naar normale ASCII 

; waarden. De carry-flag wordt gebruikt cm 

; aan te geven of er een "geldige" ASCII 

; waarde is vertaald of niet (C=0, geldig). 



OOEF nmlck equ $ef 

00F7 cplck equ $f7 

JCtt» alt equ $fb 

OOFD shift equ $fd 

OOFE cntrl equ $fe 

0000 nul equ $00 



D40 08 

041 29 7F 

D44 BE C31D 
D47 28 

m$ w ic 

D4A EO EO 

D4C 90 16 

Dm EO F8 



; Register gebruik: 

I Hocm Algemeen rekenregister 

; X-reg - ASCII waarde (voorzover bekend) 

; Y-reg - Toetswaarde 



asGxx 



php 
and 
tay 
Idx 
pip 
bpl 
cpx 
bcc 
cpx 



Hi/v bit in N-f lag 

#$7f 

( y-reg toetswaarde ) 
(tascii-l)ry Haal ASCII waarde uit de tabel 



maak 
#$eO 
brkend 
#$f8 



Is het een control toets? 
Caps- en Nuin-lock (toggle) 
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T-i r- f 
1 J r 1 — 
^. 


1 \ 


i 

r 


\: 1 f-. 1 r- r- 
L. 1 " ! • •! CL 


n n e ci: r- n n n i r" n 
N U o D -J L- U 1 "••! L 


BD50 


90 


09 




lockkey 




BD52 


8A 






txa 




Reset het corresponderende bit 


BD53 


2D 


6ABE 




and 


tstnd 




m 


6ABE 




sta 


tstnd 




BD59 


BO 


09 




bcs 


brkend 




BD5B 


8A 




lockkey 


txa 




Inverteer het "toggle" bit 


B05C 


49 


FF 




eor 


#$ff 


BD5E 


4D 


6ABE 




eor 


tstnd 




BD61 


8D 


6ABE 




sta 


tstnd 




BD64 


38 




brketid 


sec 




Geen geldige ASCII waarde 


BD65 


60 






rts 




BD66 


EO 


EO 


maak 


cpx 


#$eO 






90 


OF 




bcc 


grtctrl 


Spring bij speciale toets ingedmkt 


BD6A 


EO 


F8 




cpx 


#$f 8 


BD6C 


90 


09 




bcc 


spclend 


Shifty Cntrl en Alt: a/u functie 




8A 






txa 




Zet het bdjl^^orende bit aan 


BD6F 


49 


FF 




eor 


#$f f 




BD71 


OD 


6ABE 




ora 


tstnd 




BD74 


8D 


6ABE 




sta 


tstnd 


. ■ ■ 


BD77 


38 




spclend 


sec 




Geen geldige ASCII waarde 


BD78 


60 






rts 






BD79 


EO 


61 


gnctrl 


cpx 


#'a' 




BD7B 


90 


11 




bcc 


gnlttr 




BD7D 


EO 


7B 




cpx 


#'z'+l 




BD7F 


BO 


OD 




bcs 


gnlttr 


Het is een letter 


BD81 


A9 


OA 




Ida 


#'^cplck| 


shift 


BD83 


2C 


6ABE 




bit 


tstnd 




BD86 


FO 


24 




beq 


mkend 


Spring bij Caps lock ^ shift uLt 


BD88 


8A 






txa 




Conv. naar de hoof dlettier waarde 


BD89 


29 


5F 




and 


#$5f 




BD8B 


AA 






tax 






BD8C 


10 


IE 




bpl 


mkend 




BD8E 


CO 


47 


gnlttr 


cpy 


#$47 




B09# 


90 


10 




bcc 


granrik 


BD92 


AD 


6ABE 




Ida 


tstnd 


BD95 


29 


12 




and 


#"'ninlck| 


"'shift 


BDf? 


FO 


13 




beq 


mkend 




BD99 


C9 


12 




cmp 


tt'^nmlck 1 


'"shift 


BD9B 


FO 


OF 




beq 


mkend 


En is de num-lock functie aan? 


BD9D 


BE 


16BE 




Idx 


(tranlock-$47) ,y (d.i* Biam-lacfk ex-oj: shift ) 


BDAO 


10 


OA 




bpl 


mkend 




BDA2 


A9 


02 


gnmrk 


Ida 


#'^shift 




BDA4 


2C 


6ABE 




bit 


tstnd 




BDA7 


FO 


03 




beq 


mkend 


Spring als shift niet ingedrukt 


BDA9 


BE 


16BE 




Idx 


(tshift- 


i)fy 


BDAC 


A9 


01 


mkena 


Ida 


♦ ""cntrl 


BDAE 


2C 


6ABE 




bit 


tstnd 




BDBl 


FO 


OE 




beq 


einde 


Spring als control niet ingedrukt 


BDB3 


EO 


AO 




cpx 


#$aG 




BDB5 


BO 


06 




bcs 


l.f 


Als ASCII waarde >= cursor-conttql 


BDB7 


8A 






txa 




Naak control code van (0-31) 


BBB8 


29 


IF 




and 


#$lf 


BDBA 


AA 






tax 






BDBB 


10 


04 




bpl 


einde 




BDBD 


8A 




1 


txa 






BDBE 


69 


OF 




ado 


#$10-1 


Maak cursor control code ya^H 


BDCO 


AA 






tax 







12 



RNER 



BDCl 8A 
BDC2 18 
BDC3 60 



einde txa 
clc 
rts 

; 7abellen 



BDC4 1B31323334 tascii fee 
BDC9 353637 

BDCC 3839302D3D fee 
BDBl 7F0971 



BDD4 7765727479 

BDD9 75696F 

BDDC 705B5D0DFE 

BDEl 617364 

BDE4 6667686A6B 

BDE9 6C3B27 

BDEC 60FD5C7A78 

BDFl 637662 

BDF4 6E6D2C2E2F 
BDF9 FD12FB 
BDFC 20F7818283 
BEOl 848586 

BE04 8788898AEF 
BE09 80A7A8 
BEOC A92DA4*5M 
BE 11 2BA1A2 

BE 14 m3A0AA 



fee 
fee 

foe 

fee 

fee 
fee 

fee 
fee 



BE17 1B21402324 tshift fee 
BEie 255E26 

BEIF 2A28295F2B filKS 
BE24 7F0800 



BE27 0000000000 

BE2C 000000 

BE2F 007B7D0D00 

BE34 000000 

BE37 0000000000 
BE3C 003A22 
BE3F 7E007C0000 
BE 4 4 01^0 0#& 

BE47 00003C3E3F 
B14C 001200 
BE4F 2000919293 
BE54 949596 

BE57 979899!»li00 
BE5C 03 



fee 
fee 

fee 

fee 

fee 
fee 



^Mlfe ASCII waarclie 

$lb, '1' , '2', '3', '4', '5', '6', '7' 
'8','9', '0', '=',$7f,$09, 'q' 

'n' ,'x' , 't' , 'u','i', 'o' 
'P'f '['r'l' ,$Od,cntrl, 'a' ,'s', 'd' 

*f' ,'q> , 'h* , , '1% ' ; • , ' \ ' ' 
' shift, '\\ ' , 'z' , 'X' , 'c' , 'V' , 'b' 

' n ' , 'm' , ' , % ' 4 % '/ ' , shift, $12 , alt 
' ' , eplck.^il , $82, $83, $84 , $85, $86 

$87, $88 , $89 , $8a,iunlck, $80, $a7 , $a8 
$a9, ' - ' $ I^S ■« $ai , * # % fal , f Mi 



fee $a3,fa0,fiia 



$lb, '!','§','#','$','%','"','&' 
'*'*'{',')','_', '^+' r^7«»f Q8,nul 

nul , nul , nul , nul , nul , nul ,nul, nul 
nul, '{ ' , '} ' ,f 6d,naL,nal,nwl,il«i 

nul,niil,lllil,flttl,ttal,nul, 

' ~ ' , nul , ' I ' , nul , nul , nul , nul , nul 

nul, nul, '<','>', '?' ,nul,$12,nul 
• ' ,nul, $91 , $92 , $93 , $94, $95, $96 



fee $97, $98, $99, $9a, nul, $03 



BE5D 3738392D34 tnmloell tm '7', '8', '9', '-','4', '5', '6',' + ' 
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js \ J L — 



BE62 35362B 

BE65 313233302E fee ' 1 ' , ' 2 ' 3 ' , ' 0 ' , ' . ' 

816A 00 tstnd fee 0 Initieele waarde is 0 (alles uit) 

BE6B tmp res 1 

AO 00 end ihm 



; File 



IBMEDDCMD.MAC 



; Programma 
; Function 
• Door 



; Datum 



0600 



0600 



EDD 
• 

Editor #ire^JLayer voor het IBM toetsenbord 
■•■ 

Ad Brouwer en Erwin Visschedijk 

mei 1984, 16 oktober 1986 
org $600 



ibmeddcmd 



0600 


04 setlu 


fee 


4 


0601 


OD 


fee 


13 


0602 


15 


fee 


21 


0603 


14 


fee 


20 


0604 


80 


fee 


$80 


0605 


00 


fee 


0 


0606 


50 


fee 


80 


0607 


0000000000 


fee 


0,0 


060C 


00000000 







06 10 00080A000C conky fee 
0615 000000 

0618 IBOOOOOOOO fee 
06 ID 12 

06 IE 0911192129 tabtb fee 

0623 313941 

0626 4900000000 fee 
062B 000000 

062E 00000000 funstr fee 



0632 
0633 
0634 
0635 
0636 
0637 



IB 
11 
8A 
00 
4D 
80 



s&dkBf fee 
repkey fee 
eomkey fee 
eomopt fee 
maekey fee 
maeopt fee 



seroll naar beneden pos 
eentrum regel 
seroll naar boven pos 
aantal regels om te serolien 

default oversehrijf /insert mode 
default wraparound flag 
maximaal aantal tekens op een 



0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 reserved 

0,8,$a,0,$c,0,0,0 toegestane kontrole karakters 
tlto^f, 0,0,0, $12, 

9,17,25,33,41,49,57,65 default tab posities 
73,0,0,0,0,0,0,0 



0,0,0,0 
$lb 

$11 
$8a 
0 

'M' 
$80 



funetie toets string 

<ese> seeond key 

"Q herhaal laatste eoiranando 

FlO veriaat edit mode 

geen tmmmde veriaat toets 

2de M macro toets 

na de tweede toets 
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r 1 r- f 
1 J r 1 — 
W 


1 / 

" 1 1 1 






n n ■~- c: <—■ n r-; \, \ {— r:> 
u U o O -J U 1 ■■•! r_ F-. 


mm 


dOO^OQOOOO 


fee 


0,0,0,0,0,0 


gereserveerd 


063© 


00 




















063E 


A4 0U 




fee 


$a4,0 


links 


0640 






fee 


$a6,02 


rechts 


tMt 






fee 




beneden 


0644 


A806 




fee 


$a8,06 


boven 


0646 


0920 




fee 


$09,32 


"I tab 


0648 


16 IC 




fee 


$16,28 


"V controle karakter insert 


064A 


lUzz 




fee 


$10, 34 


spring tab posities 


064C 


Ur z4 




fee 


$0f ^ 36 


''O spring tab posities terug 








fee 




'v.jrex.^ spxxTi.s xegBX 


U D D U 


1 9 1 TV 






^ ± Z. f DO 


rv Xt?£^XXIlU so 116X111 ^ 011CX6 X6<^6X J! 


0652 


B608 




fee 


$b6,08 


woord vooruit 


0654 


B40A 




fee 


$b4 , 10 


woord terug 


0656 


AlOE 




fee 


$al, 14 


einde regel 


0658 


A70C 




fee 


$a7 , 12 


begin regel 


065A 


A3 10 




fee 


$a3,16 


seherm vooruit 










$af,l8 


ae hei:^ tmm§ 


06 5E 


AA28 




fee 


$aa,40 


delete onder de eursor 


0660 


7F30 




fee 


$7f ,48 


delete voor de eursor 


0662 


022A 




fee 


$02,42 


""B delete woord 


0664 


0E2C 




fee 


$0e,44 


''N delete tot eol 


0666 


156E 




fee 


$15,110 


'^U regel na.a.r de delete bllff#ir 


0668 


8160 




fee 


$81,96 


Fl start selecteren 


066A 


823C 




fee 


$82,60 


F2 insert paste-buffer 


066C 


B714 




fee 


$b7,20 


ga naar begin van file 


066E 


B116 




fee 


$bl,22 


ga naar einde van file 


0670 


8354 




fee 


$83,84 


F3 def zoek string en zoekt yw 


0672 


9158 

-7 J ~J VJ 




fee 


$93,88 


shift F3 zoekt voorwaards 


0674 


844E 




fee 


$84,78 


F4 def zeek en vervapg sftgiftf 


0676 


945C 




fee 


$94,92 


shift F4 verv en zoekt voorwaards 


0678 


A046 




fee 


$a0,70 


Ins set insert mode 


06 7A 


B048 




fee 




shift ins wmt oversehrijf Hiode 


067C 


OCIA 




fee 


$0c,26 


insert (form feed) 


067E 


00 




fee 


0 


beeindlg nonnaal 












067F 


00 




fee 


0 














0680 


5570 




fee 


'U' ,112 


2de U ins regel uit delete buffer 


0682 


4818 




fee 


'H' ,24 


2de H centreer huidioe t"rcif*1 




if I* 




fee 


'W ,2tl 


Wf3^ W ga naar begin van de file 


0686 


5A16 




fee 


'Z' ,22 


2de Z ga naar einde van de file 


0688 


49J6 




fee 


*%* ,m 


I Insert regel 


068A 


4A38 




fee 


'J ',56 


2de J join regel s 


068C 


2E2A 




fee 


'. ',42 


2de . delete woord 


068E 


2F2C 




fee 


'/' ,44 


2de / delete rest van de regel 


0690 


7C2E 




fee 


' 1 ' ,46 


2de 1 delete tot einde file 
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M r" [ 


"i i i 


■•■ r- \ . 1 i 
■•■ [1 1 ■■■! 1 


1 [~ ~J 
•J r_ F.. 


DOS 


. r 


c: i-"- n n i. i ^ n 
. -J L- U 1 '■■•1 [L r-.. 


MM 




fee 


1 

r f 
f 


,50 


2de 




delete woord terug 


0694 


3F34 


fee 




,52 


2de 


? 


delete tot begin file 


0696 


4f41 


fee 


'0' 


,78 


2de 


0 


• 

def zoak- en vervatigf>-strxng 


0698 


5050 


fee 




,80 


2de 


p 


verw zoek- door , , 


069A 


4C52 


fee 




,82 


2de 


L 


vervang zoek- door , ^ 


069C 


4654 


fee 




,84 


2de 


F 


def zoek-string en zoek 


069E 


4156 


fee 


'A' 


,86 


2de 


A 


, , tertigwaards 


06A0 


3A58 


fee 


r m f 


,88 


2de 


• 


zoek vw 


Oi%t 


3B5ft 


fee 


w • t 

r 


,90 


2de 




zoek tw 


06A4 


2A5C 


fee 




,92 


2de 


* 


vervang en zoek vw 


06A6 


2B5E 


fee 




,94 


2de 




tw 


mR9 


413E 


fee 




,62 


2de 


B 


def inieer wmmw^ start 


06AA 


4E40 


fee 


'N' ,64 


2de 


N 


definieer macro einde 


06 AC 


5442 


fee 




,66 


2de 


T 


teken positie 


06AE 


5944 


fee 


'Y' 


, 68 


2de 


¥ 


spring naar teken 


06B0 


5E3C 


fee 




,60 


2de 




insert paste-buffer 


06B2 


5B60 


fee 


't' 


r 96 


2de 


t 


start selecteren 


06B4 


514A 


fee 


'Q' 


,74 


2de 


Q 


type info over de tekstfile 


06B6 


434C 


fee 


'C 


,76 


2de 


c 


start cCTOTnando regel 


06B8 


00 


fee 


0 




einde 


second norntaal 



06B9 
06BB 
06BD 
06BF 
06C1 
06C3 
06C5 
06C7 



A400 
A602 

A204 
A806 



B40A 
AlOE 
A70C 



06C9 9166 
OeCB 9268 
06CD 1262 
06CF 00 



; select direct 

fee $a4,0 
$a6,02 
$a2,04 
$a8,06 
$b€,Oi 
$b4, 10 
$al, 14 
$a7,12 



fee 
fee 



fee 
fee 
fee 

fee 
fee 

fee 
fee 



$91,102 
f9Igl04 
$12,98 
0 



links 
reehts 

beneden 
boven 

woord voorwaards 

woord terug 
einde regal 
begin regel 

shift Fl plaats in paste-buffer 
sfclft m voe<f' toe aau p:a®%e-bu-f fer 
"R breek select i e mode af 
einde selectie mode 



06D0 00 



; select commando 
fee 0 



selec t second 



06D1 4876 
06D3 4678 
06D5 537A 
06D7 447C 
06D9 5C68 
06DB 7C64 

06DD 514A 
06DF 434C 
0611 00 



0600 



fee 
fee 
fee 
fee 
fee 
fee 

fee 

fee 
fee 

end 



'H' , 118 
'F' , 120 
'S' , 122 
'D' ,124 

' I ' , 100 

'Q',74 
'C ,76 
0 

ibmeddemd 



2de H verander zaak 
Me F iifbif^lieii tot reelier kantlijn 
2de S regel uitvullen (spaties) 
2de D delete overtollige spaties 
2d® \ voeg aan de paste-buffer toe 
2de I verwijder het geselecteerde 

2de Q typ info over de text file 

2de C start commando regel 
einde second selectie 



Errors de#<^ieted: 0 
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I: I r" n 
I -.J r r-.. 



C ^ r- n n 1. 1 r* n 
D U U- U r\ I N L K 



Het filne iran HELP, 

Door : Erwin Visschedijk. 

Op de systeemschi jf van DOS65 
JSftaat de utility HELP. Als dit 
commando wordt aangeroepen met als 
parameter een van de DOS 6 5 comman- 
do's (bv. 'help type') dan ver- 
schijnt er een verhaal over het 
gebruik van dat commando. Als alleen 
'help' wordt ingetypt dan verschijnt 
een overzicht van alle tot dan toe 
bekende DOS65 commando's. Als dan 
het gewenste commando wordt inge- 
typt, dan verschijnt hierover de 
informatie op het beeldscherm. De 
tekst die op het beeldscherm 
verschijnt staat eigenlijk in het 
commando zelf en wordt door het 
commando help opgezocht in het 
gevraagde commando. 

Als men zelf een utility 
schrijft, is het ook mogelijk hierin 
een 'help' gedeelte op te nemen. Het 
is dan mogelijk met het help 
commando de 'help-tekst' op het 
beeldscherm te zetten. Het is 
vooralsnog niet mogelijk de naam van 
dat commando in de lijst te laten 
opnemen van het help commando zelf. 

Men ptilt als volgt te werk om 
'help' zo gek te krijgen informatie 
te geven over het zelf gemaakte 
commando^ 

Zet 



voorin het programma een 
jump over de nu volgende tekst 
naar het eigenli jfc# ln^gin van 
het programma. 

Zet 4 bytes op deze plaats die 
een label vormen waarnaar het 
commando help naar kan zoeken. 
Dit label is 'HELP' waarvan de 
meest significante bits per 
letter hoog zijn. Er komt diis 
te staan $c8,$c5,$cc,$d0. 
Wmm ^Igen er bytes dife 

wel aanwezig moeten zijn maar 
die niet altijd gebruikt hoeven 
te worden door de g#b«iiller* 
Wil men namelijk vanuit het 
commando zelf de help-tekst ook 
0p feet l^#liiir€?lis£i[f k^iiiien 
zetten, dan komen hier de drie 
bytes te staan die een jump 
subroutine wmLm^ PRINT STKINe 
tot gevolg hebben^ dus 203fiCO. 



Wil men niet vanuit het 
commando zelf d^m trnkst ook 
kunnen printen, zet hier dan 3 
dummy bytes neer bv^ S4c^$4c^ 
$4c. 

Nu volgt de eigenlijke tekst 
die men wil weergeven. Om een 
uniforme beeldschermopmaak te 
krijgen worden de volgende 
zaken, ook in deze volgorde, 
van het commando beschreven. 
Bekijk bv. de help-teksten van 
de commando's TYPE^ PRINT en 
RS232. 

- Een regel met de 
beschrijving van het 
commando ft 

Een regal die begint met 
'%ntax :' waarin de 

#f*tax van dit commando 
wordt gedef inieerd. 

Optionele zaken uit de 
syntax specificatie worden 
voorafgegaan door een [ en 
afgesloten door een ]. 
t^^ies als -CELMN bij TWm 
staan altijd tussen haken, 
Een parameter die optJLo*- 
ii#el is staat ook tussen 
haken . ( LOAD ) 

- Dan volgt een regel dia 
begint met 'Options 
waarin de eventuele opties 
beschreven worden. Zijn er 
geen opties dan istaat hier 
'No options . ' 

- Als voor het cmmsmdo 
een afkorting bestaat die 
zelf gemaakt kan wordeu 
(zie DOS 6 5 manual pag. 
a2>33), dan ifilidfe ifeza 
abbreviation i:^<#pil 
als volgt verm«©Wli 
'Abbreviation : is er 
geen afkorting, dan staat 
hier 'No abbreviation.' 

- Als laatste kan er nog 
een voorbeeld gegeven 
worden . 

- Sluit de COTi^lete tekst- 
string af met mmm nul 
byte: $00. 
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•MIL 



DDS65 CORNER 



Hier volgt een assembler voorbeeld. 
\r is een retmrn in de ass^ttbler. 



lib DVAR ; Hierin staat print 
orf §aOOO 



irbeeld 



fee $c8^ $g5^ $cCf $dO 

prhelptxt 

jsr print ; Print text 

;until $00 
fee '\rFunctie beschri jving . ' 
fee '\rSyntax : VBEELD [-AB]' 
fee ' \r Opt ions : -A : blab la.' 
fee '\r -B : blabla. ' 

fee ' XrAbbreviation : VB' 
fee ' XrExample : VBEELD -A' 
fee ' XrGeef t een voorbeeld. \r ' 
fee $00 

start 
Ida #00 
enz « 




Vraag en Aanbod* 
Te koop : 

Apple ][/e (enhaneed met: 

- Amberkleurige Apple monitor 

_ GKia^PEE p^rl«tet^iii%##¥iMi^ met kabel 

- 80 kolomskaart met 64k WM 

- Z80 kaart voor CP/M 

- 128k RAMkaart 

- FDC floppy disk eontroller 

- 2 Apple compatible slimline drives 
Totaalpri js: f !• 1450 

Alsmede: 

OKI mieroline 80 met traetorf eed 
Prijs fl. 450.- 

Te bevragen bi j : 
A. Mueller 

Sinjeur Semeynstraat 78' 
Amsterdam 



Due to a lack of Club activi- 
ties during the summer , the Commit- 
tee members of <mr '6502 Kfeniier s ^ 
get the opportunity to travel abroad 
to inspect the equipment of the 
Club's foreign mmS^^B mmA mmJm sure 
that it does in f^t oantnln a 6502 
processor. 

I had the pleasure of being 
inspected by Erwin and Erna Vissche- 
dijk. As contptiters and their 
operators tend to overheat here 
during the hot season, I had my 
system installed in a mooler place . 

Unfortunately the picture does not 
show Erna Visschedi jk. As she was 
not dressed according to 6502 
fashion, she had to stay at the 
other side of the pool where she was 
generating IRQ waves* 

Conrad Kleipool , Cogolin, France. 
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TERMINALPROGRAMMA . 

Dit terminalprogramma^ geschreven in DOS65 basic V2,00, maakt het mogelijk 
voor mensen die nog geen communicatieprograinina bezitten voor hun modem, om 
toch contact te leggen met een Fido, bijvoorbeeld de clubfido* 
Starten op de normale wijze met RUN 
Stoppen kan met het apestaartsymbool "§-. 

1 REM Bram de Bruine terminal. 

10 POKE &E133,&0016 :REM Init acia to 300/300 
20 POKE &E132,&0005 

25 I=0:P=&AOOO :REM Poke acia irqroatine in inemory 
30 READ K 

40 POKE P+I,K:I=I + 1:IF Ko&OOFF THEN 30 

50 GOTO 90 :REM Next data contains acia irqroutine 

60 DATA 0,0,96,120,173,49,225,41,8,240,8,173,48,225,141,0 

7 0 DATA 160,88,96,173,1,1 60^ 24 0 , « ^ 141 ^ 48 ^ 2 2 5 , 1 «1 ^ 0 ^ 14 1 

80 DATA 1,160,88,96,255 

90 POKE &E76C,&0002:POKE&E76D,&00A0 :REM Swap irq vector 

f S tRIMPCHR$ { X2 ) : CURSOR TO 1 , 23 : PRINT '•TERMINAL 300/300 

Baud " : PRINT : PRINT"TERM>" ; 
100 RB=PEEK(P) 

110 IF R!^># tWi tftIll5?e«Rf fRB) ; :POKSP,dtRBM Jtaything received^ then print 
120 I$="":GETI$ 

130 IF I$<>""THEN P0KEP+1,ASC(I$) :REM Key pressed, then transmit 
140 IF I$<>-§-THEN GOTO 100 

150 POKE&E76C, &0027 :P0iai&ET6D, &00F3: PRINT :PRINT"EXIT TlRMmAl,** :E1ID 

^lto€il±i2ht ingt Bm rebels 10 en 20 ptm^mmmtmi de JMSlft. Regel 30-80 
bevatten de data voor een machinecode IRQroutine, die in het geheugen 
word gepoked, Het eerste byte (P) fungeert als ontvangstbuf f er . P+1 is 
bet zendbnfffer. 

Regel 90 laat de interruptvector naar bovengenoemde IRQroutine wijzen. 
De regels 100-150 bevatten het werkelijke terminalgedeelte. Als het 
ontvangstbuf fer niet leeg is (RB <> 0)^ wordt het ontvangen karakter 
geprint . 

Is RB=0 dan wordt gekeken of er een toets is ingedrukt. Is dit het 
gevalf dan wordt de toetscode via de RS232 poort verzonden naar het 
niodeni* 



BUGS COMMUNICATION- 6 5 V2>2 

In viditel en atstrid V2.2 zitten de volgende font en: 
I* is niet te wi jzigen met MCONFIG. 

i* Bij ASCII-upload in half -duplexmode wordt de data niet 
geprint • (Alleen astrid) 



Omdat het definieren van een breektoets in de regel een eenmalige zaak 
is, kan men die het beste als volgt wi jzigen: 



VIDITEL 

KBRK EQU $1844 

Zet met MON de gewenste waarde 
op deze locatie. (bv $04 voor ^D) 



ASTRID 

KBRK EQU $18A4 
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MON MON 
S 1844 § 18A4 

1844 t4 04 

Q Q 

Save -ab s:VIDITEL 1844,1844 Save -ab s:ASTRID 18A4,18A4 



Hobby is ten, die de breektoets ongewijzigd op ESC laten staam hoeven dit 



niet te doeri. 



ad*2 



Daar half -duplex bedrijf zelden wordt gebrtiifct, en de data ^el ^OTTwat 
naar het modem wordt verzonden, heeft deze bug het gevolg dat men niet 
zo comfortabel werkt. (Geen data op het schejrin) ^ ^ ^ 

Voor de meesten zal het niet noodzakeli|k zijn deze bug te elijlinereil* 

Bij een volgende versie zullen deze f outeil verholpen zijn. 
Indien u bugs (of ongemakken ) ontdekt , laat feet a.ii.b» if^t^Ul 

COMMUNICATIEPAKKET W2.2 

Voor DOS65 is een compleet communicatiepakket beschikbaar, bestaande 

uit : : * -r , ■ 

-Communication-65 (astrid) , bedoeld voor coramunicatie met fido's* 
-Viditel-65, speciaal ontworpen vt>or viditel databanken« (Bv Comnet, 

Elektuur ) 

-Conf iguratieprogramma 

-Manuals 

-He Iput ilities 

De softmre Is te bestellen bij d^ DOS65 software coordinator. 



Verantwoordinq Auteurs De 6502 Kenner 52. 

In de laatste 6502 Kenner hebben we verzuimd de namen van de auteurs van een 

aantal artikelen te vermelden. Omdat hiernaer gevraagd werd op de 
ledenvergadering maken we dat alsnog in orde. Hier zijn ze: 



De 6502 Kenner s gaan de lucht in 
DOS65, laatste nieuws 
Subdirectories ( pagina 16 ) 
Elektuur keyboard ( pagina 16 ) 
Trage printerspooler 
Software ( pagina 23 ) 
Manuals (pagina 23) 
Hardware (pagina 23) 
De SmartWatch : 'n slim klokje 
Tips, of leve de Taiwan-klonen ! 
Nieuw van Acorn: de Archimedes 
Nieuwe chips van GTE 
65C02 Tip(je) 



Erwin Visschedijk 
Erwin Visschedijk 
Erwin Visschedijk 
Erwin Visschedijk 
Erwin Visschedijk 
Erwin Visschedijk 
Erwin Visschedijk 



Nieo de Vries 



Nico de Vries 



Adri Hankel 
Adri liMitel 



Gert Klein 



Nico de Vries 
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. ! [T D p n ^' —■ P rn n r . i 



ER 



AOOO 
OOOD 
0009 
OOSF 
OOFC 
OOF 
C297 
AAOO 
D09F 
DOBD 
D03F 
DOOO 
S048 
D0B7 
ABEO 
C020 
C023 
C038 
C03B 
C02F 



AOOO 4C 32A2 



A003 
AOOA 
AOOB 
A030 
A05A 
A083 
AOBO 
AODA 
AIOF 
A135 
A147 
A190 
A1B3 
AlEO 
A20E 
A22D 
A272 
A2B1 



OD 

46756Ei!374 
53796E74t.l 
4F7074696F 
2020202020 
2020202020 
2020202020 
2020202020 
4162627265 
57696C6420 
537472696E 
4578616D70 
7365617263 
5345415243 
636865636B 
6F72207374 
00 



A2S2 A9 00 
A2S4 AA 
A285 9D D8A4 
A288 E8 
A289 EO 05 
A28B DO F8 
A28D A9 AA 
A28F AO 00 
A291 85 FD 
A293 84 FC 
A295 20 9BA4 
A298 90 06 
A29A A9 12 
A29C 38 
A29D 4C 91A4 



A2A0 
A2A2 
A2A4 
A2A6 
A2A8 
A2A9 
A2AB 
A2AD 



AO CK) 
Bl FC 

C*5 2D 
DO 29 
C8 

Bl FC 
C9 20 
FO ID 



4 
5 
h 

7 

8 
9 
10 
11 
12 
13 
14 
15 
16 
17 
IB 
19 
20 
21 



24 
25 
26 

28 
2<? 
30 
31 
32 
33 

35 

36 



39 
40 
41 
42 
43 
44 
45 
46 
47 
48 
49 

5i 

52 
53 
54 

55 
56 
57 
53 
59 
60 
61 
62 
63 
64 
65 
66 
67 
63 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
80 
91 
82 
83 



; #««»«♦«♦*«#♦«♦*♦♦*♦♦«#«*#♦«♦♦♦««• 

;» SEARCH C-FLNTU] FILE STRING 



;* New 00865 coiMand to search file(s) for a string 
;» A.Megens, august 1987 (c) DE 6502 KENNERS 





orQ 




cr 


gqy 


13 


tab 


equ 


9 


lii mask 


equ 


■/.oioiuii 

• •V A V ^ 4 4 • A 


cbp 


equ 




mode 


equ 


•Iff 


calpoir? 


equ 


Ic297 


inbut 


equ 


laaOO 


settiln 


equ 


$d09f 


prfile 


equ 


$dC»bd 


open 


equ 


$d03f 


sread 


equ 


idorK") 


close 


equ 


$d648 


ermes 


equ 


•Id0b7 


nafflb 


equ 


$abeO 


inchar 


equ 


$ro2n 


prchar 


equ 


$c023 


hexout 


equ 


•k038 


print 


equ 


$c03b 


crif 


equ 


$r02f 


start 


m 


search 



upper/ lowercase mask 
string pointer 

compute pointer 
input buffer 
define file naise 
print file na»e 
open file 
read single char, 
close file 

print error aesssage 
file spec, buffa^ 
get key in A 
print char, in A 
print A in hex 
print string until 0 
print crlf ';newline> 

start address 



j enables short view of possibilities 
I mm m SOS "HELP SEARCH" cofl»nand 



info 



fee 
fee 
fee 
fee 
fee 
fee 
fee 
fee 
fee 
fee 
fee 
fee 
fee 
fee 
fee 
fee 
fee 
fee 



,cr 



lc8,fcS,*ce,«0,m' jtCLP label 
er 

search file(5) for string. ',cr 
SEARCH [-FLNWLI3 file(5) string. 
"F ! Do not print f ilenaflie(5) , 

Do not print matched line(s).',cr 
Do not print line nufflbers. ,cr 
14ait after start to insert diskettes. ,cr 
Ignore ipp^li»i«rcai^%cr 
BE -^cr 

'Wild card characters are allowed in the source filespec. ,cr 
String may contain control codes or several words ,er,er 
'Examples : SEARCH fiienamel,f ilename2 print '^cr 
'search 2 files for occurance of string print. ',cr 
■ SEARCH -u dr V : [ d i r / J * . mac t est ' , cr 

'check ail .mac files on specified drive for occurance of string test',cr 
'or siring TEST%cr 

0 



Tunctic«n; 
'Syntax : 
^Optians : 

-N 
-W 
-U 

"Abbreviation 



Search (-options) <file> (string) 



search 


Ida 


#0 




tax 




elropt 


sta 


opend,x 




inx 






epx 


iopend-options 




\m 


dropt 




]M 


#inbuf))8 




Idy 


#inbuf^255 




sta 


ebp+i 




sty 


cbp 




jsr 


next par 




bee 


cont 


nof ile 


Ida 


#112 


opterr 


sec 




lerr 


jjnp 


error 



; clear options 



; point to start of inputbuffer 



;point to first parameter Kfiiename/options) 

;ok, continue 

;else filename missing 



cheek options 



eont 



getopt 



Idy 
Ida 

m 

bne 
iny 
Ida 

beq 



#0 

Ccb|33,y 
# '-" 

defile 

[cb(33,y 
# 

pfile 



; check for options 

;no options, define filename 

;get options 

; reached end of optionfield? 
;yes, point to filename 




n n 



1 n \: 



R 



A2AF C9 
A2B1 FO 
A2B3 29 
A2B5 A2 
A2B7 DD 
A2BA FO 
A2BC E3 
A2BD EO 
A2BF DO 
A2C1 A9 
A2C3 4C 
A2C6 9D 
A2C9 4C 



CD 
E7 
5F 
00 
D3A4 
OA 

1)5 
F6 
15 

9CA2 
D8A4 

ma 



A2Cr: 20 A8A4 
A2CF BO C9 
A2D1 AD DAA4 
A2D4 FO IE 
A2D6 20 3BC0 
A2D9 496E73C.572 
A2EE 20 2CC0 
A2F1 20 2FC0 
A2F4 A5 FD 
A2F6 A4 FC 
A2F8 20 9FD0 
A2Fri RO AO 
A2FD . . . 
A2FE 8D EOAB 
A301 A5 FD 
A303 A4 FC 
A305 A2 81 
A307 20 3FD0 
A30A BO 91 
A30C 8E D1A4 



A30F 20 9BA4 
A312 90 IC 
A3 14 20 3BC0 



A32D 4C BEA4 



h330 
A333 
A353 

A358 
A35B 
A362 
A363 
A366 
A369 
A36B 
A36E 
A37i 
A374 



20 3BC0 
2A2A2A2A2A 
AD D8h4 
DO 11 
20 3K;0 
46696C653A 
3S 

20 BDDO 
20 2FC0 
A9 00 
8D CAA4 
8D CBA4 
8D CCA4 
80 D2A4 



A377 AO 00 
A379 8C l:DA4 
A37C AE DiA4 
A37F 20 0000 
A3S2 SO /6 
A384 AC CDA4 
A387 99 DDA4 
A38A C8 
A38B C9 OD 
A3eD DO EA 



A38F AD cm 
A392 18 
A393 FB 
A394 m 01 



87 

m 

90 
91 
92 
93 

m 
m 
% 

97 
98 
99 

m 
m 

102 

m 
m 
m 

106 
107 
108 
109 
iiO 

Hi 

112 
113 
114 
115 

m 

117 
118 
119 



Cflip 

beq 

Idx 

teq 
im 
cpx 
bne 
Ida 
Jip 

m 



#cr 

nof ile 
#ulAask 

to 

optionSfX 
enable 

topeml-^tions 

sapt 

«15 

opterr 

opend.x 

getopt. 



jreached EOL / 

fthen no filename given 

{accept upper/lowercase 

jcheck option table 
jfnaiiU one 

;all options cte^i^iir^ 
im, trynixt 
}tlse Optmn error 

fset qjtion flag 
;and fet next option 



qfA f iii tief inition 
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bts 

defile Wa 
beq 
jsr 
fee 
jsr 

Ida 
Idy 
jsr 
bcs 
txa 
sta 
Ida 
Idy 
Idx 
jsr 
bcs 
stx 



wfnonsp 
nofile 
waitflg 
10. f 
print 

inchar 
crlf 
cbp+1 
cbp 

mfiin 
Im 

naab 

cbp+1 

cbp 

mi 

open 
lerr 
fiRode 



; search filename 
;not found 
jcheck -W option 
|not set, continue 

jelse give opportunity to swap diskettes 

^....'•0 

jnait for key 



{define file-name 
} error in naRP 



jopen file for ASCII reading 
}mm q?mm% file 



120 
121 
122 
123 
124 
125 

317 5365617263 126 



get searchstring 



127 
128 
129 
130 
131 



jsr nextpar 

bcc tloob 

jsr print ... 

fee *&faretelrifi miiing 

jiBp xerror 



5 point to next paraaffiter <^aretetring> 
i start search 



i search opened file 

ffilOOp 



133 

134 

135 

136 

137 

138 

139 

140 

141 

142 

143 

144 

145 

146 

147 

148 

149 

150 

151 

152 

153 

154 

155 

156 

157 

158 

159 

160 

161 

162 

163 

164 
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jsr 
fee 
Ida 
bne 
isr 
fee 
sec 
jsr 
jsr 

m 

sta 
sta 
sta 
sta 



print 

,er ,0 

" ' *" ;print filename? 

inn, skip it 



fileflg 
11. f 
print 

'Him \fS 



crlf 
#0 

lineent 
linecnt+1 
linecnt+2 
match 



jshow current file 
jwith drive spec. 

}r^t^ lif^ coiMer 



rline 
loop 



Idy 
sty 
Idx 
jsr 
bcs 
Idy 
sta 
iny 
cmp 
bne 



#0 

ysav 

ffflode 

sread 

Ibr 
ysav 

lindt^uf^y 

#cr 
loop 



{read one line from file 

{read single char* 
jend^of Jile 



•CR? 

;no, get fl^l iter 



check this line for mafti^ strings 



niine 



Ida 
clc 
sed 
ade 



lineent 



tl 



{Update line ewiter 
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'KEMNER DQS65 CORNER 



A396 8D CAA4 
A399 AD CBA4 
A39C 69 00 
A39E 8D CBA4 
A3A1 AD CCA4 
A.3A4 69 00 
A3A6 BD cm 
A3A9 D8 
A3AA A2 00 
A3AC: BD DDA4 
A3AF C9 OD 
A3B1 FO 44 
A3B3 BE D0A4 
A3B6 AO 00 
A3B8 Bl PC 
A3BA 09 OD 
A3BC FO ^ 
A3BE 48 
A3BF BD DDA4 
A3C2 3D CEA4 
A3C5 68 
A3C6 3E CFA4 
A3C9 AE D9A4 
A3Cl: FO 17 
A3CE CV 41 
A3D0 90 13 
A3D2 29 ^ 
A3D4 48 
A3D5 AE CFA4 
A3D8 BD DDA4 
A3DB C9 41 
A3DD 90 02 
A3DF 29 5F 
A3E1 8D CEA4 
A3E4 68 
A3E5 AE CFA4 
A3E3 CD CEA4 
A3EB DO 04 
h3ED E8 
A3EE C8 
A3EF DO C7 
A3F1 AE D0A4 
A.3F4 ES 
A3F5 DO B5 
A3F7 4C 77A3 
A3FA 4C 42A4 



h3FD A9 01 
ilJFF 8D D2A4 
A402 AD DCA4 
A405 DO 21 
A407 20 3BC0 
A40A 4L696E653A 
A411 AD CCA4 
A4i4 20 RDA4 
A417 AD CBA4 
A41A 20 BDA4 
A4iD AD CAA4 
A420 20 3SC0 
A423 A9 09 
A425 20 23C0 
A42S AD D6A4 
A42B DO OF 
A42D AO 00 
A42F 69 0DA4 
A432 20 23G0 
M35 C9 OD 
A437 FO 03 
A439 C8 
A43A DO F3 
A43C 20 2FC0 
A43F 4C 77A3 



A442 20 48D0 

mm SO IF 



165 
166 
167 
168 
169 
170 
171 
172 
173 
174 
175 
176 
177 
178 
179 
180 
181 
182 
183 
184 
185 
186 
187 
188 
189 
190 
191 
192 
193 
194 
195 
196 
197 
19a 
199 
2('iO 
201 
202 
203 
204 
205 
206 
207 
208 
209 
210 
211 
212 
213 
214 
215 
21e 
217 
218 
219 
220 
221 

224 

■•.■-.IT 

226 
227 
228 
229 
230 
231 
232 
233 
234 
235 
236 
237 
238 
239 
240 
241 
212 
243 
244 
245 



sta 
Ida 
adc 
sta 
Ida 
adc 
sta 
dd 
Idx 

sloopl Ida 
beq 

StK 

Idy 

5l(X92 Ida 
beq 

sta 
pla 

stx 
Idx 
beq 

Cflip 

bcc 
and 
pha 
Idx 
Ida 

bcc 
mi 

b sta 
pi a 
Idx 

bne 
im 

iny 
bne 
idx 
im 
bne 
i«p 



check 



nextch 



rne.st 
Ibf 



linecnt 

linecnt+1 
#0 

linecnt+l 
linficiit+2 

m 

#0 

linebuf|X; 
rnext 

r 

»cr 
found 

mm 

Msav ; ' 
casetlg; i 
check 

check 
itiliiask 

Ksav 

linebuf |K 

#A 

U 

m0 

mm 
nextch 



sloop2 

sloopl 

rline 

nfiie 



found Ida 
sta 
Ida 

bne 

}sr 

ice 

Ida 
jsr 
Ida 
jsr 
Ida 
jsr 
Ida 
jsr 

priine Ida 
bne 
Idy 
Ida 
jsr 
cip 
beq 
iny 

m 



ploop 



pdone 



#1 

iatch 
nuflifig 
priine 
print 
Line: ',0 
iinecnt+2 
pruui 
!lRecnt+i 
prnuffl 
linecnt 
heKQut 
It^ ; 
prchar 
lineflg 
pdone 

io 

linebuf 
p-char I 

pitoib^ 

ploop 
crlf 
rline 



iget char, fron line buffer 
peidied end? 
ly^i read next line 



■,qet char, from searchstrino 
jif EOL thenMtcbed! 



{ignore upper and lowercase? 
;no, check the way it is 

jalso digits and controichar. 
;eise convert to upj^ca^ 



jbuffer too 



fcoftpare buffer and string 
vnot matched . try next in 'buffer 
jelse point to next char, in buffer 
^and searchstring 

pKtt char, in linebuffer 

jread next line o-f -file 
^extend branch, open next file 



iistch^ string fc»ind, sh£»i it 



ft iatched string is found 

jprint line number? 
I no, skip this part 

jprint line nu«ber 



; print line? 

;nO| skip this part 



|l»)d read next line 



EOF detected, cipen n©it fil# 



nfile 



isr 
Ida 
bne 



cicme 
natch 
l.f 



idose curreri>li|t 



2 3 



II I 
I i r 



^■•1 ! I :-^KENNER D: 



c s 

O D -J 



□ RNE 



A44A 20 3BC0 
A44D 4E6F206Ktl 
A469 E6 FF 
A46B AO 00 
A46D Bl FC 
A46F 8D CEA4 
A472 A9 OD 
A474 91 FC 
A476 A9 FA 
A478 A2 81 
A47A 20 3FD0 
A47D 48 
A47E AO 00 
A480 AD CEA4 
A483 91 FC 
A485 63 
A486 BO OD 
A488 3E D1A4 
A48B 4C 30A3 



h48E 20 
A491 20 B71^ 
A494 to 
A495 C9 13 
A497 FO FB 
mm DO F6 



A49B 
A49D 
A49E 
A4A0 
A4A2 
A4A4 
A4A^ 



A4A9 

A4AB 
A4hj 

A4Bi 

a4e; 

A4B6 
A4B7 
A4B6 
A4B9 
A4Bh 
A4BC 



AO FF 
CB 

Bl FC 
C9 OD 
FO 14 
C9 20 
BO FS 
C8 

Bl FC 

C9 OD 



rO F5 
20 97G2 
18 
■SO 
38 

54 FC 
f>0 



A4BD DO 08 
fi4BF A9 20 
■A4Ci 20 ZXO 

my « m6 



A4CA 000000 
A4CD00 
ft4CE 00 
A4CF 00 
A4D0 00 
n401 m 
A4D2 m 

A4D3 46^4C4E 

(m 00 

A4DA 00 
A4DB 00 
A4DC 00 
A4DD 



246 

247 
248 
249 

250 
251 
252 
253 
254 
255 
256 
257 
258 
259 
260 
261 
262 
263 
264 
265 
266 
267 
268 
269 
270 
271 



274 



J5r 
kc 
inc 
Idy 
Ida 
sta 
Ida 
sta 
Ida 
Idx 
jsr 
la 
dy 
Ida 
sta 

& 

stx 



ft 



print 

"No fliatched string(s) found '|ir|# 

mode 

#0 

[cbpl,y 
asav 
icr 

tcbpl,y 
Ufa 
ftlSl 
open 



;put tejBp. EOL at start of searchstring 
;rieKt file 

itspm file for rm^m 



xerror jsr 
error jsr 
done 

BKlt 



Errors detected: 0 



rts 
tip 
beg 
bne 



#0 

asav 
[cbp3,y 

exit 

ffliode 

iTiloop 

close 
mm 

»li3 
done 
error 



275 ipolnt to next parameter 



278 
279 
280 
29i 
282 
283 
284 
2B5 
2S6 
287 
238 
239 
290 
291 
292 
293 

m 

296 
2^7 
298 
299 
300 

302 
303 
304 

m 

306 
307 
308 
309 
310 
311 
312 
313 
314 
315 
316 
317 
318 
319 
320 
321 
322 
323 



nextpr li$ 
wtspaca iny 
Ida 

beq 

Ipe 

wfnonsp iny 
Ida 

beq 
twp 
beq 
Jsr 

clc 
rts 
sec 
rts 
sty 
rtc 



parerr 



«-l 

tcbpl,y 
Icr 

|ar err 

Iff space 

[cbpJ,y 
#cr 

garerr 

wfnonsp 
calpoin 



cbp 



print linenufflbaTf convert 
pleading zero's ^^fimm 



mm bne 
Ida 
jsr 
j«p 

prnusl jfl^ 



|rnuffll 

prchar 
prchar 
hex out 



linecnt fee 
fee 
fee 

fee 



ysav 
asav 
Msav 
xpos 
fffiode 
ffidtch 



tec 
fee 
fee 



options fee 
opend Eou 
fileflg fee 
caseflg fee 
waitflg fee 
linefig fee 
nu»flg fee 
linebuf res 



0,0|0 
0 

0 

0 

0 

0 
0 

FUWLN' 



0 
0 
0 
0 

2^ 



end start 



jrestore siirthstring 

; error opening next file, return to DOS 

jsearch this file 

jclose file 
; print error 
; return to DOS 

5 file not found' error, then all files done 
5 else other ©rrar occired 



;se^ch trnt par^peter 

;get char, fron inputbiiffer 

;it EOL parameter missing 

; space? 

5 no, ti^y next 

I skip spaces 

;get char, from inputbuffer 

;if E(L parameter missing 
; space? 
jyes, try next 
; update pointer 



variables and tables 



;line counter 



5 live fd 

lliich flag 

; possible optii^is 

;for every t^tion a 

5-F option 

;-U option 

j-W option 

option 
ylim buffer 



flag 
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De siwpraie van een drive is db 

snelheid waarroee de kop van de ene 
track naar de volgende stapt. Het is 
lie tijd tussen twee step-pulsen. ' ^ 

Default staat de steprate van 
de D0S65 drives op 12 ms. Dit is de 
snelheid die gekozen wordt door de 
boot routine. Daarna neemt de DOS 
van schijf het over en dan hangt het 
mf van de boot die filii^tmlieerd is 
welke steprate :«r |^&«iiite>iiiili^di 112, 
6 of 3 ms ) . 

Als men echter oudere drives op 
D0S65 wil aansluiten dan kan het 
zijn dat de steprate van 12 ms te 
snel is. Het is aogelijk zelfs 20 of 
30 ms te kiezen. Als het niet de 
drive is van waaruit moet worden 
opgestart, dan kan men volstaan met 
alleen de DOS op schijf te wijzigen. 
Woet er echter van de trage drive 
worden opgestart, dan m^ei ook de 
eprom (1065) worden a:sm^$m$^ ■ ^ 
omgeprogrammeerd . 

Met installatie programma op de 
systeemschi jf voorziet niet in een 
keuze van 20 of 30 ms steprate. Het 
een en ander momi dan self m^den 
gewi jzigd. 

De 3 ms steprate wordt met een 
truuk uit de 6 ms gehaald. D0S6S 
schakeit dan sof twarematig even over 
naar een 8 inch drive die een 
dubl»ele t^lock snelheid heeft. De 
floppy disk controller krijgt dan 
tijdens het steppen een dubbele 
clock snelheid, zodat de siepraie 
verdubbeld wordt. 

Er staan in de programmatuur 
twee waarden die moeten worden 
aangepast om de steprate te wijzi- 
gen. In de listings heten die REST 
mm SEEKf* Hieronder volgt een tabel 
voor de waarden die REST en SEEKT 
moeten hebben voor de verschillende 
siielheden. De snel^eden kuanen niet 
voor iedere drive af zc»ndiirii4ll 
worden ingesteld. 

6ms 12ms 20ms 30ms 
REST 08 09 OA OB 

mm IS 19 lA IB 



Cm de systeemschi jf aan te 
passen voor steprates van 20 of 
30 lis moet het programma DISKDOCTOR 
gebruikt worden. 

In DISKDOCTOR kan een track 
gekozen worden met het T commando en 
een sector met het S commando. In de 
nieuwere piSIKDOCTOR 's kunnen deze 
hexadecimaal worden ingegeven. In de 
oudere moet dat decinaai worden 
gedaan. De informatie op de schijf 
is ook hexadecimaal , dus de gebrui- 
kers van de oudere DD moeten de hex 
waarden omrekenen naar decimaal. 
Men gaat als volgt te werk: 

- Copieer eerst een systeemschi jf om 
op t? experimenteren. (Vergeet niet 
het BOOTLINK commando.) De file BOOT 
wordt gebruikt als D0S65 operating 
system en hierin staan de waarden 
die gewijzigd moeten worden. 

- Start DISKDOCTOR op en kies de 
drive waarin dm. zojuistJL, ff C«3ipi<|eird# 
diskette zit. 

- Ga naar track 0, Jiec^tor 3. De 
laatste 2 bytes op de regel waar een 
filenaam staat geven aan op welke 
track en sector het TSL blok van die 
file staat. 

^ Ga naar de track en sector die 
aangegeven worden bij de file BOOT. 

- Op deze sector staat vanaf adres 
$20 per 2 bytes de track en sector 
nummers van 4m data blokken. Adres 
$40 en $41 geven de track en sector 
aan van het 17e data blok. Ga naar 
het 17e blok door de juiste tr#ck m 
sector te kiezen. 

- Zoek in deze track naar AO 19 en 
A009. De A019 en A009 staan alleeli 
in deze sector als de file BOOT 
gecopieerd is van de gedistribueerde 
^ysteemschi jf als hierop nog geeii 
installatie programma is losgelaten. 
Anders wordt namelijk de file BOOT 
overschreven door de inhoud mm 
BOOTB (6ms) of BOOTC iOQm |# 
de 12ms versie. 

- Wijzig de 19 en de 09 volgens de 
tabel. 

- Schrijf deze sector weer weg met 
het comsando W. 



In de eprom 1065 staat REST op 
adres FEF2 en staat SEEKT op FEBF. 



Succes, Erwin Visschedijk* 



In den beqiBne > ^ > > « en lioe^t verder 

(Of: rol van CcMHiEK^dore ) . 
Door : dp WriLe^ 

Het volgende nuiraner van dit 
blad 2:al lie€ eeF#t:# Mii^ van de 
twaalfde jaargang zijn. 

Onwillekeurig denk je dan, zo rond 
de 5iiai?#i^^ilfl^/ terug tmmM &oe het 
ooit eens was. Zo ook over onze 
club^ de 6502, de KIM, de andere 
eei!^%e iftachliie^. Daarom eens een 
verhaal over het begin. Voor 
diegenen dim al tien jaar of langer 
1 id zijn: Imik om f ImMmn 
misschien. Voor onze nii^iliit^^ ledlen: 
zo is het dus gekomen . • • • • • 

MPS fectinolQcry^ 

fft If 74 gebetirtdte er metsv dat 
waarschi jnli jk iedere dag wel 
gebeurt: een bedrijf neemt een ander 
bedrijf over. Of '^eaiezer: 
Coiranodore, fabrikant van 

rekenmachines en kantoormeubelen 
ne^A* €e ehipfabriek MOS Technol^^ 
over, met als doel zelf chips voor 
haar rekenmachines te maken en 
minder afhatffcelljk v^an anderen te 
zi jn . 

MOS Technology maakte toen wat 
IMP- en ROM-geheugens , vrijwel 
iiljleTOaal second sources van andere 
f abrikaiiten,, zoals Motorola en 
IntsS . ft#t ( en is ) ^^en van de 

kleinere chipf abrieken . Een van de 
direct^uren, Chuck Peddle genaamd 
hield ¥±^h odflf be^ig met 
microprocessors, en wel de 6800 van 
Motorola. Chuck kreeg het gevoel dat 
het beter kon en begon na te denken. 
Na enige tijd ontwierp hij een 
nieuwe microprocessor die wij 
allemaal kennent d^ §502. 

Als uitgangspunt nam Chuck de 
6800 die hij immers kende. De 
instructieset Was naar zijn smaak te 
groot. Hij ontwierp een kleinere 
set, die echter wel dezelfde 
mogeli jkheden had. £)# ' €800 was 
verder voorzien van twee accu's, een 
16 bit index register en een 16 bit 
stackpointer. Het viel Chuck op^ dat 



in veel gevallen 8 bits voor deze 
registers meer dan voldoende waren . 
De 6502 kreeg dan ook een strikte 8- 
bit architectuur met 1 accu. Om het 
verlies vaW &sm accu en de 
verkleining van de 16 bit index naar 
8 bit J een beet je gped te maken 
ere erde hij er een tweede index 
register Y bij. Ook de adressering 
kon verbeterd worden . Zo kreeg de 
6502 indirecte adres s eerroodes (kunt 
u nog zonder? ) die toendertijd zeer 
uniek waren. Later zouden de 6809 en 
de Z80 als enige 8 -bit €apDr*# mk 
indirecte modes kri jgen. Wall lile€f 
van de 6800 was de bus interface en 
het bi jbehorende protocol en #e 
pinning . Op die manier kon de 6502 
gebruik maken van de reeds bestaande 
6800-serie bouwstenen, waaronder het 
6810 mm, de 682® JKElk en de 6840 
PTM. Deze f eiten waren overigens 
voor Motorola aanleiding tot een 
proces , dat zij uiteindelijk 
ver loren . 

Een apart verhaal vormden de 
prestaties van de processor. In die 
tijd was 1 MHz zo ongeveer de enig 
praktische clocksnelheid omdat 
gfeheugens domweg niet sneller waren . 
Prestatiewinst moest dus komen uit 
een zo klein mogelijk aantal 
clockGycli peir int^^truetie* De 6502 
kreeg een zogenaamde pipe-line 
structuur. In een dergelijke 
striUffe^oir doet de CPU in principe ' 
steeds meer dan 1 ding tegelijk* Een | 
voorbeeld: terwi jl de | 

ins ti^#t l^eooder het opgehaalde 
opcodebyte decodeert, haalt de 
busbesturing al vast het volgende 
byte op €at ittesg^lt^fe lie operand tif J 
de volgende opcode is . Op die manier 
bespaart men clockcycli. Dit 
verklaart bij voor bee Id waarom JMP en 
JSR relatief veel cycles vereisen: 
de pipe-line faalt hierbij zodat er 
tenminrste 1 extra geheugencyc lus 
nodig is. Dankzij de pipe-line is de 
6502 een opvallend snelle CPU 
geworden . Hij i# WBlfm zo snel dat 
een 4 MHz 6502 geen gek figuur slaat 
ten opzichte van 68000 en 8086 CPU's 
die ap 4 of 6 MHfii l€ipmml 

Dankzij Chuck Peddle kreeg 
Commodore dus zijn eigen 

microprocessor^ die in 
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ontwerperskringen voor enige 

opschudding zorgde. In die tl^d 
hadden ontwerpers niet veel te 
kiezen: Intel maakte de 8080 en 
m^bmola de €80i« ©e 6502 was dus 
een welkome aanvulling. Met deze 
drie microprocessors werd heel 
am^sm tiii^i^p^gen dan nu. Hogere 
programmeertalen waren nog niet 
beschikbaar^ veel geheugen ook niet^ 
en nieniand had eigenlijk een idee 
wat dm werkelijke mogeli jkheden 
waren ♦ Het gebruik van 

Mmrmpmrnm^rnm-s bli^^f daar out in 
eerste ini^tiantie beperkt tot een 
aantal techneuten die in 

bpbbykamert jes mini-systeemp jeit iti 
elkaar prutsten, Dit leidde soms tot 
het uitbrengen van zo'n systeempje 
in bouwdoos vorro : de kit, 

Bij MOS Technology was het al 
niet anders. De eerste kit die 
f ^aalf^ werd rond de 6502 was de KIM 
(Dit betekent: Keyboard Input 
Monitor) en deze werd in 1975 door 
MOS Technology op de markt gebracht. 
De KIM zag er net zo uit als alle 
andere kits: een CPU (de 6502 op 1 
MHz), wat geheugen (2S6 byte was 
heel gewoon^ Ikbyte al een luxe), 
een nogal primitieve monitor in ROM 
en de noodzakeli jke I/O. De I/O 
bestond uit een tweetal RRIOTs die 
ten dele gebruikt werden om het 
hexadecimale toetsenbord en de zes 
zevensegment displays aan te sturen. 
Verder was de KIM voorzien van een 
oatssetteinterface oin de prograinina ' s 
te kunnen bewaren. Op sominige KIMs 
is de invloed van Coipinodore waar te 
nemen: zij dragen liefe Ccunmodore- 
embleem ( zie bi jvoorbeeld de aquarel 
op de oudere nummers ) • 

Na de introductie van de KIM 
liep het storm. Er werden er 
duizenden verkocht: de markt was er 
keiinelijk rijp voor. De kopers 
kwamen uit drie typische groepen: de 
Industrie, die er kleine 

besturinkjes mee bouwde, het 
onderwijs, die er de hedendaagse 
sciiare computergekken mee opvoedde 
Bm de technisch ge nteresseerde 
hobbyist. De aantrekkingskrai^JM; was 
groot: men sluite een voeding en een 
Gassetterecorder aan en men heef t 
een bele eehte cc^uter ! Niet alleen 



de atantrekkingskracht was groot: ook 
de problemen. Een hele generatie 
technici werd plotsklaps geciMriiir^- 
teerd met lets heel nieuws: de 
microprocessor. ledereen worstelde 
met in principe dazelfde probl^aim!!, 
veelal ontstaan uit dezelfde 
oorzaak: gebrek aan informatie en 
«rrmMLng. Dit was een ideale 
voedingsbodem voor allerlei clubs en 
clubjes waarin van gedachten werd 
gewisseld over de nieuwe speeltjes. 
Overal ter wereld schoten de 
gebruikersclubs dan ook als 
paddestoelen uit de €firciiirfl.- wet^d 
in Nederland een eerste computerclub 
opgericht door een aantal 

vooruitziende li@#eiii de KIM 
Gebruikers Club Nederland. Het 
clubblad van deze vereniging heeft u 
nu in handen* Bet: blad Radio 
Bulletin zorgde via allerlei 
leerzame artikelen voor een nog 
grotere popiilarifteit van de KIM. 

De ontwikkelingen stonden 
echter niet stil. Chuck Peddle had 
nog meer idee n. De KIM- en ^ijn 
broertjes waren allesbehalve 

gebruikersvriendelijk: geen kast r 
eeti losse voedinf^ ^mi losse 
cassetterecorder , programmeren in 
machinetaal^ en last but not least: 
een primitieve gebriiikersinterf ace 
met klein hex display en het kleine 
toetsenbord, Het kon allemaal 
mooier. iftaesrt om te beginnen in 

1 enkele kast. Dit was voor 
Commodore geen probleem: men had 
ruiitti^ (-mmmTiM§ met s t al en 
kantoormeubelen . Het toetsenbord 
moest een schri jfmachine-indeling 
tor£:|gen. Zo f e#<f tiiedde . De displays 
werden vervangen door een heus TV- 
scherm. Ook voor het onvriendeli jke 
prog^rmimeren in ittaehinetaal wwm een 
oplossing. Bij een klein bedrijf je, 
dat de naam Microsoft drpegi; had een 
17- j ar ig j ochie een BAS IC- 

interpreter geschreven die op de 
6502 liep. Al deze ingredi nten 
werden in een grate pot gekiept. 
Toen het gekookte gaar was , was het 
midden 1977 geworden . Het produqt 
heette: 

De PET. 
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\ In die dagen was het beeld van 
een computer heel andeif^ dan nu: 
iiS03B|mters , zo dacht de gewone man^ 
vullen grote zalen en kosten zeer^ 
zeer veel geld, zowel in aansreliaf 
als in gebruik. Commodore 

introduceerde de PET (afkorting van: 
Personal Electronic Transactor, zegt 
fiiets over de kwaliteit van het 
apparaat!). Voor $495 (toen ca. fl. 
2200.-) kreeg je een complete 
coBlputer in een kast die er 
futuristisch uitzag. De PET had 4 
kbyte geheugen, standaard een BASIC 
interpreter met floating point, een 
scherm met een werkelijk uitstekend 
beeld van 25 regels met ieder 40 
tekens en bezat verder standaard een 
ingebouwde cassetterecorder die niet 
alleen snel was maar ook zeer 
b€*^fill^aaif bleek. De gewone man kon 
hem kopen en gemakkelijk leren 
bedienen, mede dankzij de nog altijd 
niet #^rtrof fen #ehermeditoi:» 

De bom barstte. Commodore werd 
overspoeld met orders . De verkoop 
ging WBiMw zo goadi dat men niet eens 
tijd had om andere dingen te doen 
zoals goede documentatie schrijven, 
mt ' i^inter oisfeiiilifctufceii of zelfs 
gebruikersvragen beantwoorden . Dit 
probleem was zo groot, dat men er 
tot tiM 1979 la^ "mm hebben, 

Ongeveer tegeli jkerti jd was er 
een technisch iemand, die Steve 
Wmm^Sik h@#tt e • Hif oude 
Volkswagenbus en de garage van zijn 
ouderlijk huis was zijn hobbykamer. 
im 'tiifn vrije tijd liwpiiie St.mm"mmn 
6502 computer. De machine was 
voorzien van een aantal speciale 
zak^: 16 ^^Mif*€ #piiaBdiNA ^f€*ieugen 
(zeer veel voor die tijd) dat met 
een zeer forse investering kon 
m>^<A^n uitgebireid tot 48 kbyt»y een 
geschakelde voeding, high-resolution 
graphics / en een aantal 

liJ^ifereldings slots waarc^ #e 6S02 bus 
' Ipiieelteli jk) beschikbaar was. 
Ifmt^mx bezat de machine net als de 
I^CT een B^1!C^ interpreter (weliswaar 
alleen integers) en 40 koloms video. 
UMek in de Apple was de standaard 
aatiwezige maeliinetaalmonitor , die 
not a bene ook nog kon 

disassembleren. In tegenstelling tot 
de PET^ wiens toetsenbord duidelifk 



Commodore ' S calculatorachtergrond 
verraadde, had ^i^^^^is lifil^ltti^'^^fi 
heus schri jfmachinetoetsenbord dat 
echter alleen hqpfdletters kon 
produceren . Steve " %oifil ak !tb€l»de 
zijn machine de Apple. Net als 
Commodore is Apple heden ten dage 
een computer fabrikant tJxi toog steeds 
oieetelt • 

Commodore, 

Terug naar Commodore. Omdat men 
het zo druk had met het verkopen van 
PETs, bleven noodzakeli jke dingen 
als een printer en een diskdrive 
(te) lang uit. Ook het verhelpen van 
de bugs in de ROMs van de PET duurde 
lang. In 1979, toen men de grote 
klap te boven begon t# kt^^n, 
vers^hOTien eindelijk de 

langverwachte printer en de 
diskdrive. Tegeli jkerti jd W(^rd "ile 
PET op de helling gezet. Er werd een 
volwaardig toetsenbord gemonteerd 
(de cassetterecorder werd extern), 
terwijl er ook mm^ bugvrije 
ROMset verscheen, die naar het 
voorbeeld van Apple was uitgebreid 
mmt een machinetaal monitor. Ook 
werden de machines nu leverbaar met 
geheugens tot 32 kbyte. Voor het 
eerst kon er wmt de PET (ook Apple 
was inmiddels zover en introduceerde 
een DOS en drives ) aan serieuze 
zaken gedacltt wmm&m^ zoals zakelijke 
toepassingen. Een tekstverwerker 
verscheen. De verkopen bleven 
*t:ijgen, terwijl de prijzen 
nauwelijks daalden. De computer 
gebaseerd op de microprocessor had 
zijn liiftirede gedaan in het kantoor. 

Er ontstond vraag naar machines 
met 80 koloms schermen, grotere 
diskdrives en snellere printers. In 
1980 kwam Commodore uit met de 80 32, 
die voorzien was van 80 koloms video 
met fiii^ fcrachtiger edit- 

mogeli jkheden. Deze machine was 
zodanig geprijsd en zo goed 
uitgedacJ^fe, Sat de 8032 gedurende de 
VIJF jaar daarna de meest verkochte 
personal computer werd in Europa. 
Trfttrs^igti ^e ^mbtie man niet 

vergeten. Men had de technisch 
ge nteresseerde hobbyist al een PET 
verkocht en de kantoreu een 8032 . De 
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man in wtra^^t mms mi aan beurt. 

In het najaar van 1981 
verseheen de VIC-20. Er waren twee 
dingen nieuw aan deze computer: het 
was de eerste Commodore computer 
wonder scherm. Dat moest vanwege het 
tweede uieuwtje: kleur. De VlC-fl 
ontleende zijn naam aan de Video- 
Interface-Chip^ die een kleurenbeeld 
van 25 regels van 22 karakters 
genereerde. De 22 werd afgerond naar 
20, De VIC-20 was opgezet als 
spellet jesdot^^ pur sang: kleur, 

geluid^ weinig geheugen en een 
cartridge poort. Als scherm kon de 
kleuren TV in de huiskamer worden 
benut. Door z'n aantrekkeli jke prijs 
(ca. fl, 1000.-) en een grote 
reclame campagne werd het een 
succes. De VIC-20 was bewust beperkt 
gehouden: er moest een instap op 
lage niveau mogelijk zijn en er 
Utoest ruimte zijn voor een opvolger. 

Die opvolger kwam er. Na lets 
meer dan een jaar verseheen de 
klapper van de eeuw: de Commodore 
64, zo genoemd vanwege het feit dat 
deze machine 64 kbyte geheugen hM. 
De 64 kon goedkoop in massa worden 
geproduceerd omdat MOS Technology 
(die inmiddeis Commodore 

Semiconductor Group teette) al het 
raQeilijke in een dtfietal speciaal 
vdof de 64 gemaakte chips had 
gebakken: de VIC-II (een 6567) 
maakte het schitterende hi-res 
kleuren beeld (compleet met 8 
afzonderlijk te definieren en te 
bewagen objecten^ de sprites) en 
zorgde en passant voor de (niet 
eenvoudige) besturing van de DRAMs . 
De tweede innovatie was de CIA (de 
6526); een soort luxe VIA. De derde 
sp€rciala chip was de 6581 SID: zo 
ongeveer een halve synthesizer die 
voor fascinerende geluidsef f ecten 
kan zorgen. De ontwikkelingskosten 
voor de 64 zijn zeer laag geweest: 
vrijwel alias stamde uit de VIC-20 
terwijl deze machine op zijn beurt 
grotendeels stoelde op de tweede 
serie PETs. De verkopen daarentegen 
dv^ertrof f en de stoutste v^iWiM^lftlfi^ 
gen: Commodore begon weer aan 
dezelfde groeistuipen te lijden als 
in het begin. Het antwoord van de 
concurrent ie kwam ook: MSX, met de 



Japanners die immers nooit van de 
computerkoek hadden meegesnoept^ 
voorop. De 64 is door de enorme 
aantallen die ervan zijn verkocht 
uitgegroeid tot een standaard: je 
kunt hem nog steeds kopen^ zij het 
in een nieuw jasje. 

De €3p¥c>lger van de 64^ de 128 
maakte zijn verwachtingen niet meer 
waar: de markt was verzadigd 
geraakt, mede door dumptoestanden 
met de MSX en MSX-2 machines en de 
trues van meneer Clive Sinclair met 
de ZX^l mm. de Spectrum* 

Vandaaq . 

Vandaag kun je nog steeds de 
invloeden van het begin aanwijzen. 
Zo wordt er nog aitJLj^ in 
machinetaal geprogrammeerd . De 6502 
is nog steeds redelijk populair voor 
kleine besturingen: de KIM en later 
de Apple zijn hier verantwoordeli jk 
voor omdat deze machines de 6502 
introduceerden bi^ dJLs^iti^rt nu 
in het management zitten en er hun 
ervaring met microprocessors mee 
opdeden. De and^rre 8-bit CPU's 
(behalve misschien de Z-80) zijn nu 
een langzame dood aan het sterven, 
©f zijn al overleden m^milm 8^ 215 
de 1802 en de SC/MP. 

Als je terug kijkt kun je zien 
da* TWl p^#ai## de goed@ poiitiek 
heeft gevolgd om de markt voor zich 
op te eisen: wacht tot er standaards 
gaan i^^tt#tMail, combineer deze^ en 
pas een modernere CPU toe. Het 
recept? Neem een goede BASIC ^ {^^^ 
van Microssofft (iti#| clirtbifHBdif de^e 
met een 1 : 1 kopie van de PET scherm 
editor^ voorzie de machine van 
uitbreidings slots it! ftp^ple-sti jl^ 
bouw het geheel op met 

standaardcomponenten die zich allang 
bewezen hebben^ gebruik een 
operating system dat compatible is 
met het immens populaire CP/M en 
laat dit draaien op een rigd^lijk 
moderne CPU van Intel ^ nota bene de 
uitvinders van de microprocessor^ en 
wat fcrijg je? juist, de IWl fC* Itt 
de Taiwanezen maar kopieren ....*. . 
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0001 
0002 
0003 
0004 
0005 
0006 
0007 
0008 
0009 
0010 
0011 
0012 
0013 
0014 
0015 
0016 
0017 
0018 
0019 
0020 
0021 
0022 
0023 
0024 



0026 
0027 
0028 
0029 
0030 
0031 
0032 
0033 
0034 
0035 
0036 
0037 
0038 
0039 
0040 
0041 
0042 
0043 
0044 
0045 
0046 
0047 
0048 
0049 
0050 
0051 
©052 
0053 
0054 
0055 
0056 
0057 
0058 



0000 
0000 

oood 

0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
ElOD 
ElOl 
FOOO 
2325 
F71D 
2311 
24B2 
24B2 
24B5 
24B8 
24BA 
24BC 
24BC 
24BD 
24BD 
24C0 
24C2 
24C4 
24C6 
24C8 
24CA 
24CC 
24CE 
24D1 
24D2 
24D2 
24D4 
24D7 
24D8 
24D8 
24DB 
24DD 
24DF 
24E2 
24E4 
24E6 
24E8 
24EB 
24EC 
24EC 
24EE 
24F1 
24F2 



.TITLE 'OCTOFATE ASSEMBLER FOR EC65/0CKXUS 
LISTII^ START/STOP AND DELAY =*= 
iagS/OCTOPOS ODMPUTER =^ 



V2.4' 



; G.A. PETERUSMA 



LEERDAM 



HOLLAND 



;===« ftbUiflED VERSION OF El^^fp*! 
;==== LISTING STOPPER .. 

•ELmoR coMi>UTiN6 t^tffi 5 &m so DUTCH mitim 



YAIFR , 

VIDEO 

KPDO 

F^HA 



2000F0 
ADODEl 
2902 
DOOl 

60 

ADOlEl 

2907 

C915 . 

F026 

C911 

F008 

C903 

DOEE 

8D2523 

m 

A9D7 

8du^: 

60 

2000FO 

C90A 

dodd 

201DF7 

C911 

D0F9 

A9B1 

8D112i 

60 

A9F1 

8D1123 

60 



START 



BY 



ABC«T 



PRPST 



*=$E10D 

*=§Eioi ; 

♦»$K)00 
*=$2325 
*=$F71D 
*=$2311 

JSR VIDEO 
LDA VAIFR 
AND «$02 
BNE CHECK 

RTS 

LDA VAPAD 
AND #$07 
CMP #$15 
BEQ PRPDEL 
CMP #$11 
BEQ PRPST 
CMP #$03 
BNE BY 
STA KPDO \ , 



LDA #$D7 
STA OUT 



1 3 I M 



STOP 



VIDEO 
CMP #$0A , , 
BNE BY 
GEICKEY JSR RECCHA ' 
CMP #$11 
BNE GETKEY ], 
LDA #$B|" 'I] 

STA otn' 

RTS 

!mmL LDA #$F1 
STA OUT 



;IF NOEf RiTWRN 

',GET THE CHARACTffi... 

AND MASK IT 
jWAS IT FUNCTION KEY P2 t 

iWSbS ,IT FUNCTION KEY Fl ? 

;IIA£; IT A iflBAlC It 



;CHAl«5E OUTPUT BYTE TO 
f SK)i RPPTMIE 

;DO WE HAVE A LINEFEED 7 
;IF NOT, RETURN 

;START AGAIN ? 



; CHANGE CWTPUI, SpE ^TO , 
;DELAY ROUTINE' ' ' ' !' " 



a 



24F2 2000F0 DELAY JSR VIDEO 



30 < 



0060 
0061 
WQ&l 
0063 
0064 

ms5 

0066 
0067 
0068 
0069 
0070 
0071 
0072 
0073 
0074 
0075 
0076 
0077 
0078 
0079 
©QiO 

0081 
0082 
0083 
0084 
0085 
00^ 



2^ 
24F8 
24FA 

mm 

24FF 
2502 
2504 
2506 
2508 
25GA 
250D 
250E 
250E 
2510 
2512 
2513 
2515 
2516 
2518 
2519 
2519 
2519 
2519 
2519 
2519 
2519 
2519 

mm 







LOA VAIFR 


Sfnr PRESSED 7 


2902 




AND #$02 




D003 




BNE axn 




4C0E25 






• TP NCYP - nPT AV AHATM 

# JLcT nii/JL # JLillSiJMliX riVjinXn 


ADOlEl 


CXSIT 


LDA VAPAD 




297F 




AND #$7F 




C915 






:P0MCMON KEY F2 ? ' 


D005 




BNE RETURN 




A9B1 




LDA *$B1 


;RESTC»E OUTPUT BYTE 


8D1123 




STA OUT 




60 


• 


im 




A240 


VEL 


LDX #$40 


; DELAY IME 


A07F 


LOAD 


LDY #$7F 




88 


DECY 


DEY 




dOfd 








CA 




DEX 




D0F8 




BNE LOAD 




60 




RTS 





•To use this routine 
jchange address $2311 into $B1 
;F1 = Function key 1 or CTL-S 
;F2 * Function key 2 or CTL-U 
; BREAK = Break key or CTL-C 



EM) m ASSEMBLY 



ERRC^ DESmrmz WOO 



10 

20 

30 

40 

50 

60 

70 

60 

90 

100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

340 



REM **♦«♦***#««** PROGRAMM LII^L® «»♦«*«***#### 

REM DIESES PROGRAMM LOEST LINEARE GLEI CHUNGSSYSTEME 
REM NACH DEM GAUSS-JORDAN ALGORITHMUS 

REM VER0EFFENTLICHUN6 INDER FUNKSCHAU 1980, HEFT20/82 
REM AUTORf 8HO0E 1»-ia-1978 

REM 

REM AUF DEN EC-65 AN6EPASST DURCH W.TIETSCH, MAERZ 1986 
REM «««***«**«*«««**«»«*««««*««***«««*«««*««««««««*«««« 



T1=PEEK<2888) :T2=PE 
DISK! "GO F32F":REM 
DISK! "10 ,01 : REM SC 
REM ALLOW <CR> ONLY 
F0RI=1T05:PRINT:NEX 
PRINTTAB (20) "***«#* 
PRINTTAB <20) "« 
PRINTTAB<20) "» 
PRINTTAB<20) "* 
PRINTTAB(20) "* 
PRINTTAB<20) "« 
PRINTTA6(20) "* 
PRINTTAB(20) "* 
PRINTTAB(20) "# 
PRINTTAB(20) "»♦*««* 
PRINT:PRINTTAB<20) " 
PRINTTAB(20) "Invers 
PRINTTAB (20) "Beende 
PRINT: PRINTTAB (55) I 
IFW$=""THEN1240 * 
IFW$="1 "THEN350 
IFW*="2"THEN860 
F0RI«1T02sPRINTCHR» 



EK(8722) :P0KE2888,0:P0KE8722,i£J 
CLEAR SCREEN AND HOME CURSOR 
REEN ONLY OUTPUT 

INPUT ~> "" 
TI 

************************************* " 

#w 

Dieses Programm loest «" 

«•» 

LINEARE GLEICHUNGSSYSTEME 
t bis zur Ordnung 15) 

Lineare 61 eichungssysteme 1" 
e Matrizenberechflfifil — > 2" 
Programm durch — > <CR>" 



< 27 ) I "S 1 8 HEX T I s eOT029D 




KENNFR EC65 CMRNirR 



350 REM BERECHNUNS DES LINEAREN SLEI CHUN6SSYSTEHES 
360 DISK! "GO F32F"!REM CLEAR SCREEN 

370 PRINTTAB(20)"««» il^ilCI*yW^i¥^^^^ ***" 

380 PRINTTAB(20) " ~ — 

390 PRINT: DISK! "10 ,01": REM SCREEN-OUTPUT ONLY 

^VOO PRINTTAB ( 1 5 ) "Dieses Programm loest lineare Gleichungssysteme" 
410 PRINTTAB ( 1 5) "nach der Methode des Gauss- Jordan-Algorithmus" 
420 PRINTTABdS) "Die maximale Anzahl der N der Spalten muss <16 seini" 
430 PRINT: PRINT: PRINTTAB(15) "Das lifl9«re €l»ll?hun9«syst«« hat 4im "f 
440 PRINT"f olgende Form:":PRINT 

450 PRINTTAB(15) "a1 1 x1 + a12x2 + ... + ainxn = a1" 
460 PRINTTAB(15> "a21 x1 + a22x2 + ... + a2nxn = a2" 
470 PRINTTABdS) " . 
480 PRINTTABdS)" 

490 PRINTTAB (15) "an1 x1 + an2x2 + ... + annxn = an" 

500 F0RI=1T07:PRINT:NEXTI:PRINTTAB(15)"Weiter ~> < CR>" ; ! INPUTW* 

510 DISK! "60 F32F":REM CLEAR SCREEN 

520 PRINTTABdS) INPUT"lnput/Output auf Drucker J/N 
530 IFW$="J"THENDISK! "10 ,09" 

540 PRINTCHR*(27) : "3"; ». ^ ^. .. „ 

550 CLEAR: D = 1 : PRINTTAB (16);: INPUT"Ordnung des Gl.-SystCilS N • "|N 

560 IFN=00RN>15THENPRINTCHR*(27) ;"5"; :G0T0550 
570 PRINT: PRINT :N=N-1 :DIMA(N,N+1) 

580 PRINTTABdS) "Gebe die Koef f i z ienten der Matrix ein" ^ 
590 PRINTTABdS) " — *■ • — — — ' — I PRINT 

600 FORI=OTON:F0RJ=OTON+1 

610 IFJ=N+1THENPRINTTAB(35) "A <":I+1;") = " ; : INPUTA ( I , J) l60T063WJ 
620 PRINTTABd5) "A ( " : I + 1 : " , " ; J + 1 j " ) = " j : INPUTAd, J) 
630 NEXTJ:PRINT:PRINT:NEXTI 

640 PRINTTABdS) " . PRINT 

650 PRINTTABdS)" Die Loesung des GleicMfgllVSrBteflies l'»JPRINT 

660 PRINT: PRINT :F0RK=0T0N:IFK=NTHEN710^_ w 

670 A B = A B S t A ( K , K ) ) : F 0 R I =K+ 1 TON s I F ABS ( A < I , K ) X •AiTHENTOO 

680 AB=ABS<A<I,K)) :D=-D 

690 F0RJ = KTON+4 sI=A(K, J) : A<K, J)«ACIidf> fllCI,«»f tlllXT# 

700 NEXTI 

710 IFABSCACK.K) X1E-7THEN820 
720 FORI=OTON: IFI=KTHEN740 

730 F = A ( I , K ) / A < K , K ) : F 0 R J = K + 1 TON+ 1 ! A ( 1 , J ) » A < 1 , J ) - A CK , J > «F I NEX T J 

740 NEXTI ,K : IFCO0THEN1 150 
750 FORI=OTON: D=D*A(I , I ) :NEXTI 

760 PRINTTABdS) "Die Determinante Det (A) = ";D:PRINT 

770 PRINTTABdS) "Dex- Loesungsvek tor ist :":PRINT 

780 F0RI=0T0N:PRINTTAB(27)"r';l + 1 ; " = " ; A < I , N+1) / A ( I , I) : NEXT I 

790 PRINT 

800 PRINTTABdS)" ":PRINT 

810 PRINTTABdS) "Weiter --> < CR > " ; : INPUTW$ : G0T01 20 

820 PRINTTABdS) "Das Gl eichungssystem ist nicht eindeutig loesbar" 
830 PRlNTTABd5) "A < " jK+l i " , " I K+1 1 " > " ; ver«ehwlnci«t •f»n«eh«rnil ! " 

840 G0T0800 
850 " 

860 REM BERECHNUNG DER INVERSEN MATRIX 
870 DISK '"GO F32F":REM CLEAR SCREEN 

880 PRINTTAB(18)"*** MATRIZEN - INVERSIONEN ♦#»" 

a9n PRINTTABdS)" ; PRINT 

900 PRINT-DISK! "10 ,01":REM SCREEN-OUTPUT^ ONLY . m.*„4„.. 
910 PRINTTABdS) "Dieses Programm berechnet die inverse Matrix 
920 PRINT: PRINTTABdS) "Die Ordnung der Matrix muss <16sein!. 
930 PRINTTABdS) "Die Matrix hat die f olgende Forms PRINTS PPjtUT 
940 PRINTTAB<20)"I d11 d12 ... din I" 
950 PRINTTAB(20) "I d2i d22 ... d2n I 
960 PRINTTAB(20) "I , - I, 

970 PRINTTAB(20) "I . ■ J., 

980 PRINTTAB(20) "I . ^ _^ ■ \„ 

?28o'?^KI??^??^RiNT^RlxTI?PilNTtABd5?^[]eiLr -> < CR>" INPUTW* 
1010 DISK! "GO F32F":REM CLEAR SCREEN , ^ . ^ .. 
1020 PRINTTABdS) :: INPUT"Input/Output auf Drucker J/N jW* 
1030 1FW$="J"THENDISK ! "10 ,09" ' 

1050 CLEAR :PRINfTAfed6h:INPUT"0rdnung des Sl.-Systema H • "|M 

1060 1FN=06rN>15THENPRII^TCHR*(27) :"5";" ";:GOTOl650 

1070 N=N-1 : DIMA(N,N+1 ) : DIMD(N,N+1 ) ^ ^ . 

1080 PRINTTABdS) "Gebe die Koef £ izienten der Matrix em^ 

1090 PRINTTABdS) " ^ — infj.fil 

V,?8 "pS5i5f?i§'2li?8r?i?S.i,%-.JM,"> - ",.iMPUTo<i.j) 



1120 
1130 
1140 
1150 
1 160 
1170 
1 180 
1 190 
1200 
1210 
-1220 
1230 
1240 



NEXTJzPRINTsNEXTI 

FORI=OTON;FORJ=OTON:A<I , J)=D<I, J) :NEXTJ:NEXTI 

J=N+1 ;FORI=OTON:A<I , J)=0:NEXTI: A<€, JJ-li;©-©*! !©®^©!*!! 

PRINTTAB<15)Cj". Spalte" : PRINT 

FORI=OTON:PRI MTTAB <15)"A ( " j M | «* , « 1 6 1 *» • *** ^ « f«*1 * 1 1 i > 
NEXTI: PRINT 

IFC<=NTHENPiI»lWTAB<1St"ll«f^«fe« SpaltS — ^> ••ft€©T012OO 

G0T01220 

I N PUT W* : tPllt*'"*THEN1 1 30 

G0T0120 

PRINT:PRINTTAB(15)" — ^-*'! PRI NT 

PRINTTAB(15) "Weiter — > < CR>" j : INPUTW* s GOTOI 20 

DISK! "60 F32F"rP0KE288a,T1 iP0KE8722,Ttf ilSK! "10, 01"iNlW 



:«««<»»»»: 



W.Cuypers 

Wingerdstraat 22 

5682-CL Best 

tel TOTS 0«f§S-ti2? 

16 KAMAALS 12 BIT A/D CONVERTOR VOQR 
CPU SYSTEEM. 



C^zet was ma m&t restantieii vmn 

mijn oude Octopus een nuttig geheel 
samen te bouwen wat op eender welk 
systeeitt aansluitbaar tms^ Ikls T/0 Is 
daarom gekozen voor de bij iedereen 
bekende 6821 tesamen met een A/D 
s^^^^mmj^&K^ ^Mjb op dit mennent door 



enige • 'M&keti in Nederland voor 
aantrekkeli jke pTxfzmi veirkocht 
wordt. 

De IB> 5f4 lieeft de mogeli jkheid om 
direct aan een 8, 12 of 16 bit 
systeem gehangen te worden zonder 
ext^mm buffer's. In het schema is de 
AD 574 getekend in de 12 bit mode. 
Door pen 2 van het IC aan mass a te 
hangen ' eotrverteert de chip de 
ingevoerde spanning in een 8 bit 
signaal dat parallel wordt 
uitgevoerd. In de S lilt mode kuimen 
de 8 hoogste bits of de 4 laagste 
bits worden gelezen afhankelijk van 
de status wmm MS f pen . Wotxr zo*n 




rirf- - ^-1 1 i 



rx 



NNER 



r~ r- =r n n r:^ h- 1 r" n 
CL. L- Q -J L- U ^. ' -i C- r-. 



applicatie moeten echter de 4 LSB's 
(pin 16-19) doorverbonden worden met 
de 4 MSB's (pin 24-27). Als tijdens 
lezen AO laag is, worden de 8 lagere 
bits g#«-aiiabled en staat de te lezen 
data op pin 20 tot 27. Is AO echter 
hoog, dan worden de 8 hogere bits 
gedisabled en staan de 4 LSB's op 
pin 24-27. De 4 mdciel^te bits 
worden genegeerd zodait er geen data 
de pennen 20 tot 23 staat. Tot 
zover de 8/12 bit mogeli jkheid. Voor 
de dieper ge nteresseerde verwijs ik 
naar het ANALOG DEVICES data sheet. 
Omdat 1 analoge ingang te weinig was 
om echt mee te kunnen stoeien is er 
€Ne^ «fcak#e hSLT^mm tussengeplakt in 
de vorm van de AD 7506. Deze chip 
kent 16 analoge ingangen, die alle 
J^imgsspa^iilfiq^en tot 24 Volt kunnen 
irerwerken. De chip schakelt d.m.v. 
^n 4 bit code een van de 16 
iiigancfan door naar zijn uitgang. Als 
ingangscircuit is de LM 324 gekozen 
i.v.m. zijn compact e opbouw en 
li®@iy^iteit . 

Van het geheel is in de tussentijd 
een printtekening gemaakt die ik 
e??i2^warti»@®i r kan copi ren. 

( print forniaat 100*160 wm, Eurokaart) 

Onderde lenl i jst : 

Rl, R2 en R3 = 22kohin 1/4 W 1% 

CI = 150 nF 

ICl, 2, 3 en 4 - LM324 

IC5 = AD7506 

IC6 AD574 

IC7 = S»M 

Software : 

De eerste tappet ^s EC 6 5 CPU kaart 
met 48 kbyte statisch geheugen en 
een graphic controller als 

uitlezing. De stDtftH^i^ir staat 
gedeeltelijk in de BOOT-ROM op de 
CPU kaart ^ het restant zit op de 
statisehe RAMka^t d.m*^. 2764 
EPROMs. Hiermee zou dan een compleet 
stand-alone systeem opgebouwd kunnen 
worden . 

De tweede opzet werd via de tweede 
parallel poort aan mijn IBM kloon. 
baair dit ten alle tijdte m'n systeem 
zou belasten heb ik dit maar weer 
terzi jde geschoven . 

Derde mogeli jkheid is met behnlp van 

de 8052 kaart zoals onlangs door 
Elektuur uitgebracht. Een wezenlijk 



voordeel is^ dat het een redelijk 
zelfstandig systeem wordt wat ten 
alle tijden d.m.v. de seri le poort 
te be nvloeden is. 

Zoals te merken is, heb ik mijn keus 
nog niet gemaakt. Een ieder die 
hierin mee wil deifl«*i^ verzoek ik 
daarom contact fiat mij op te nemen. 

Octopus WP: een oproep. 

Door: R.T. Overakker 
Laan van Foot 458 
2566 DP DEN HAAG 
Telefoon 070-250281 



IjidLf Rasmussen 



Voor diegenen dJL@ 
Octopus van 
aanschaf ten . 

Het is mogeli jk, dat de versies 3.0 
en 3 . 1 door elkaar zijn geraakt , en 
dat in sommige systeemschi jven een 
bug is binnengeslopen. Het adres 
$01OF lM3^t al^ fiCy maar $7C zijn. 

Daarnaast zijn nu ook de complete 
sources en de manual op schijf 
besehilcbaa** 

Indien u een correct werkende 
versie wenst te ontvangen, stuur dan 
het benodigde aantal schijven met 
een brief je en ret ou r per t o aan: 
Gert van Opbroek 
Bat0ir#g 60 
2481 m WOOBRUGGE 

U om^mmst dan de 
versie. 



Oproep 1 * 

Wie wil de sof twarebibliotheek gaan 

beheren voor de Octopus /EC65 
computers van Elektuur? De bedoeling 
is^ dat de^e persoon een catiil#gns 
aanlegt van alle software die binnen 
de club aanwezig is voor deze 
systemen^ en iteipt ##2^ te 
verspreiden. Ook zal hij de centrale 
figuur zijn^ om nieuwe 

ontwikke 1 ingen te melden en 
zelf gemaakte softmm:m aan op te 
sturen. 

Wie wil? Aanmelding bij het bestuur 
of de redactie . 
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H L. U L_ I i r_ [L I "^1 



N* de Vries . 



Dp listing 

buitengewoon 
geheugentest . Het 



die 



na dit 

intensieve 
programma werd 



oorspi^i^iilcalijlt qpschreven door Carl 
Hoser (Ja^ die van de assembler..)* 

Bij geheugenproblemen kunnen de 
volgeitd€J tling^n lie oensaaik zLjnt 

- Een chipselect werkt niet. 

- Een adreslijn is kortgesloten naar 
d# Hill of 4-f ^olt . 

- Een datalijn is kortgesloten naar 
de nul of +5 Volt. 

De lat^tste oor^iitk mim^ door 
vrijwel iedere primitieve g#iMiugen- 
test gevonden. De eersfte twee 
oorzaken eehter ineestal niet. Bet 
prograinina bestaat uit twee tests, 
die na elkaar worden uitgevoerd. Het 
is de bedoelingv dat het prograinina 
vannit een monitoromgeving gerund 
wordt. Na be indiging van de eerste 
test volgt een BRK instruct ie. In de 
meeste monitoren kan voor de tweede 
test gewoon een G (CR) of E (CR) 
gegeven worden am de tweede te^t %m 
starten. Aan de inhoud van de accu 
is te zien, welke test zojuist 
voltooid werd. De accu bevat El aan 
het eind van test 1 en E2 aan het 
eind van test 2 . Indien aan het eind 
van test 2 weer een E/G (CI) wordt 
gegeven , dan wordt test 1 weer 
uitgevoerd enzovoort . 

Test 1 is bedoeld om het 
geheugen te testen op dataretentie 
en op pnderbroken/ kortgesloten data- 
en adreslijnen. Dit wordt gedaan 

door 00 01 02 03 04 FE FF in 

de opvolgende geheugenlocaties te 
schrijven en deze data vervolgens 
weer terug te lezen. Nadat het 
gehele geheugenblok gevuld is, volgt 
nogmaals een teruglezing. Met deze 
laatste teruglasing wordt de echte 
geheugenf unctie getests bij wat 
grotere blokken duurt het langer dan 
een ref reshperiode voor de tweede 
teruglezing wordt uitgevoerd. Bij de 
volgende loop wordt er 01 02 03 04 

05 FE FF 00 in de locaties 

geschreven. Dit gaat zo door totdat 
iedere locatie alle mogelijke bytes 



heeft geschreven en gelezen heef t 
gekregen. 

Test 2 is bedoeld om de Chip 
Select lijnen te testen. De test 
verloopt analoog aan test 1, met dit 
verschil dat de laatste data niet 
FF, maar F2 is. Omdat de cyclus nu 
korter is dan 256 bytes komt 
hetzelfde testpatroon niet steeds 
een pagina verder terecht , maar 
eerder. Hierdoor kunnen 

overlappingen in Chip-Selects worden 
gevonden . 

Gedurende de test worden er 
puntjes op het scherm geprint om de 
gebruiker te laten weten , dat het 
programma nog loopt . leder puntje is 
een complete doorgang van 1 patroon. 
Er w&m^mm: dus alti^d . 256 puntjes 
afgedrukt. De grootte van het 
geteste blok bepaalt hoe snel dit 
gebenrt. Dit afdrukken is wel 
noodzakeli jk^ omdat op 1 MHz een 
test van 1 kbyte al 38 seconden 
duurt . Als er een f out wordt 
gevonden^ dan wordt het adres waar 
de fout optrad afgedrukt, gevolgd 
door de data die er had moeten staan 
en de data die werd teruggelezen. 
Alle informatie verschijnt in hex. 

Fouten die in de eerste test 
worden gevonden zijn vrijwel altijd 
te wijten aan een def ecte 
geheugenchip . Aan het adres is te 
zien in welk geheugen de fout 
optrad y aan de data eventueel ook 
als er andere geheugens dan byte- 
brede typen zijn toegepast. Verloopt 
test 1 goed , maar test 2 nietr dan 
is er lets mis met de Chip-Select 
f unctie. In dat geval is er 
waar s chijnlijk lets aan de Jtai^ 
de decoders of met de adresli|iim M 
tot en met A15. 

Als er foiiten optreiien in 
adres sen die steedte een bepaalde 
macht van 2 uit elkaar liggen ( 2 , 4 , 
8, 16, enzovoort ) , dan is er lets 
aan de hand met de adres 1 i jnen. De 
volgende tabel kan dan helpen: 
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rx r 



iF FN 



Data bit 
met foutJ 

DO 
Dl 
D2 

03 

m 

05 

lii 
07 



Controleer 
adresli jn; 

AO of A8 
Al of A9 
A2 of AlO 
A3 of All 
A4 of A12 
A5 of A13 
A6 of A14 
A7 of AX5 



Voorbeeld;s 

Indien u een array met 4116's (16k x 
1) over een bereik van 32 kbyte 
ODHtroleert en er treden fouten op 
over het hele bereik bij test 1^ dan 
is er iets mis met: de refresh^ een 
of meer datali jnen, een of ineer 
adresli jnen of de voediiig* Treden er 



echter alleen fouten op in test 2, 
dan is de generatie van de CAS (=CS) 
de oorzaak. 

Bij fouten in test 1 zal evaluatie 
van de verwachte en de teruggelezen 
dteia, in sanisniiang i|i foute 

adressen tot de predate cmrzaak 
moeten leiden. 

OPMERKING: de listing is gemaakt op 
een DOS 6 5 machine met de assembler 
AS. Het programma is echter 
universeel; het kent maar 1 extern 
label te weten de routine die het 
ASCII karakt^r in A afdirtikt. Deze 
routine is voor iedere machine wel 
te vinden. Door de ORG statements 
aan te pas sen ^ kan het programma zo 
ongeveer overal neergezet worden; 
het is minder dan een pagina lang. 



• * 



;* MEMTEST 



; *♦ ********************* ♦*********^ 

* 
* 
* 
* 
* 
* 
* 



;* 



; * A universal memory test program r 
; * originally written by Carl Moser • 
;* Comments by N. de Vries . 



• * 

f 



**************************************** 







0000 




ORG 


0 




0000 






ADDRS 


RES 

• 


2 


; current memory address 






0200 




ORG 


$0200 


; start of program 


0200 


A2 


00 


MEMTEST 


LDX 


#0 




0202 


8E 


E102 




STX 




?se€ tmt tfpm 1 


0205 


20 


1B02 




JSR 


TESTPGM 


; perform test 


0208 


A9 


El 




LDA 


#$E1 


;get flag 


020A 


60 






BRK 




janta break into moaitojr 


020B 


EA 






NOP 




|to eliminate 


020C 


EA 






NOP 




JBRK overhead 


020D 


EE 


El 02 




INC 


TSTTYPE 


f n^et trest type 1 


0210 


20 


1B02 




JSR 


TESTPGM 


;perform test 


0213 


A9 


E2 




LDA 


#$E2 


;flag test 2 ended 


02 IS 


m 






warn 




;and break iitto monitor 


0216 


EA 






NOP 




; skip 


0217 


EA 






NOP 




;BRK overhead 


0218 


4C 


0002 




JMP 


MEMTES*P 


fmmM test again 


021B 


20 


A402 


TESTPGM 


JSR 


CRLF 


; start on new line 


021E 


AO 


00 




LDY 


#0 


ipiitterit register 


0220 


A2 


00 




LDX 


#0 


;get offset zero 


0222 


BE 


E002 




STX 


TSTPTRN 


;intialize test pattern 


0225 


4C 


3302 




JMP 


NX_PASS 


;and start testing 
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mm m m 

022A 20 CB02 
022D EE E002 
023© 00 01 
0232 60 



0233 AC 
0236 20 
0239 98 
023A 81 

023C CI 
02 3E FO 

mm m 

0243 20 
0246 FO 
0248 20 
024B 4C 



E002 
AD02 

00 

00 
03 



7A02 
06 

6702 
3902 



024E 
0251 
0254 

0255 
0257 
0259 
025G 
025F 
0261 
0264 



AC B002 
20 AD02 
98 

CI 00 

FO 03 
20 8702 

FO C7 
20 6702 
4C 5402 



0267 C8 

0268 AD E102 
026B FO m 
026D CO F3 
026F 90 02 

mi l m 00 

0273 E6 00 
0275 DO 02 
0277 E6 01 
0279 60 



mjmm LDA 
JSR 
INC 
BNE 
RTS 

NXPASS LDY 

JSR 

LOOPl TYA 
StA 
CMP 
BEQ 
JSR 

NOERRl JSR 
BEQ 
JSR 
JMP 

CKPTRN LDY 

JSR 

L00P2 TYA 
CMP 

BEQ 
JSR 

N0_ERR2 JSR 

BEQ 
JSR 
JMP 



• ♦** 



INCJH INY 
LDA 
BEQ 
CPY 
BCC 
LDY 

INCADDR INC 
BNE 
INC 

SKIP HI RTS 



#'•' ;get a period 

WRITE ; print it 

TSTPTRN ; adapt test pattern 

MXy»SS ;if all patterns done 

TSTPTRN ;get current pattern 
INIADDR ;inove start to current 

;move pattern to A 
[ADDRS^X] ;move to jAeeory 
[ADDRS^X] ;if read back 1m wrong 
N0_ERR1 ; 

ERROR ; print address and values 
CHKEND ;else check if at end 
CK_PTRN ;if so, test data retention 
IHC RY ; adapt pattern+address 
I^MJPl ian^ repeat 

TSTPTRN ;get current pattern 
n^^gUDR ; move start to current 
;get test pattern in A 
AADDRS.XO ; check if still there 
N0_ERR2 ;if not, 

ERROR ;print address and values 
CHKEND ; check if at end address 
NX_PTRN ;if so, do next pattern 
INC_RY ; adapt patter n+addres s 
LOOP2 ;and loop 



Adapt Y and increment address 



TSTTYPE 

INCADDR 

#$F3 

INCADDR 

#0 

ADDRS 

SKIP_HI 

ADDRS+1 



adapt current pattern 

get tesft nujober 

if te^t 1/ mK±t 

if at chip select test 

value 

reset Y 

adapt address low 
if on page boundary 
adapt address high 



027A AD DF02 
027D C5 01 
027F DO 05 
0281 AD DE02 
0284 €5 00 
0286 60 



0287 48 

0288 20 A402 
028B A5 01 
028D 20 B802 
0290 A5 00 



CHKEND 



EXITl 



ERROR 



• *** 

f 


Check if at end address 


LDA 


ENDAD+1 


; get end address high 


CMP 


ADtms+i 


;if high bytes 


BNE 


EXITl 


; match , 


LDA 


ENDAD 


;get end address low 


CMP 


ADDRS 


;if at end address, set Z 


RTS 




;aiid exit 


r 

• * * * 
r 


Print faili 


ng address and data 


PHA 




;save A 


■^MK 


CRLF 


; start on a new line 


LDA 


ADDRS+1 


; get address high 


JSR 


TBYT 


; print it in hex 


LDA 




;get address low 
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m9t 20 B802 
0295 20 D502 

0298 68 

0299 20 B802 
029C 20 D502 
029F Al 00 
02A1 20 B802 



>JSR TBYT ; and «s<»fiiet^e address 

JSR SPMCE2 ; print two spaces 

PLA ; restore test data 

JSR TBYT ; print it 

JSR SPACE2 ; print two spaces 

LDA AADDRS,XU ;get memory contents 

JSR TBYT ; print in k&x, and: 



02A4 A9 OD 
02A6 20 CB02 
02Af m OA 
02AB DO IE 



CRLF 



• * * * 

LDA 
JSR 
LDA 

mm 



Print CRLF 

#$0D 
WRITE 



WRITE 



;get a return 
; print it 

;pd,l* it and exit 



*** Get start address in current address 



02AD 


AD 


DC02 


INIADDR 


LDA 


START 


;qet start low 


02B0 


85 


00 




STA 


ADDRS 


;in current address low 


U Z oZ 








LDA 


START+l 


;get start high 


02B5 


85 


01 




STA 


ADDRS+1 


;and complete address 


UZB/ 


ou 






• 




;then exit 










r 

• *** 
f 

m 


Print A in 


hex 


Uzr5o 






TRYT 


t 

PHA 




;save A 


02B9 


4A 






LSRA 




;get 


02BA 


4A 






T CPU 




; high 


02BB 


4A 






LSRA 




; nibble into 


02BC 


4A 






LSRA 




;low nibble 


U ZrJL/ 


20 


C102 




JSR 


NIBBLE 


; print nibble in hex 


02C0 


68 






PLA 




; restore A 


02C1 


29 


OF 


NIBBLE 


AND 


#%00001111 ;get low nibble only 


02C3 


09 


30 




ORA 




^d^wreirt to ASCII 


02C5 


C9 


3A 




CMP 


#$3A 


; if letter 


02C7 


90 


02 
06 




BCC 


WRITE 


;add 


02C9 


69 




ADC 


#6 


; letter offset 










f 

• *** 
f 


Print the 


character in A 


02CB 


8C 


E202 


WRITE 


STY 


SAVEY 


;save Y 


02CE 


20 


23C0 


ROMLINK 


JSR 


OUTPUT 


; print A 


02D1 


AC 


E202 




LDY 


SAVEY 


; restore ¥ 


02D4 


60 






RTS 




;and exit 










f 
f 


Print two 


spaces 


02D5 


20 


D802 


SPACE 2 


JSR 


SPACE 


; print a space ^ and: 


02D8 


A9 


20 


SPACE 


LDA 


#$20 


igpfc a space 


02DA 


DO 


EF 




BNE 


WRITE 


; and go print it 










f 


Start and 


end addresses 


02DC 


0003 


START 


FDB 


$0300 


; default start address 


02DE 


FF8F 


ENDAD 


PDB 


$8FFF 


; default end address 


02E0 






TSTPTRN 


RES 


1 


; current test pattern 


02E1 






TSTTYPE 


RES 


1 


; current test type 



38 



DE£-) 3 Q ^ KENNER ' ALGEMEr 



I -J 



02E2 



SAVEY 



RES 



C023 OUTPUT EQU 



END 



;save place for Y 
XmhmX 

$C023 ; print tMm 0liatsmcj^«r in % 
giidba:! labels 



ADDRS 


0000 


CHKEND 


027A 


CK PTRN 


024E 


CRLF 


02A4 




02DE 


ERROR 


0287 


EXITl 


0286 


INCADDR 


0273 


INC RY 


0267 


INIADDR 


02AD 


LOOPl 


0239 


L00P2 


0254 


MEMTEST 


0200 


NIBBLE 


02C1 


NO ERRl 


0243 


NO ERR2 


025C 


NX PASS 


0233 


NX PTRN 


0228 


OUTPUT 


C023 


ROMLtNt 


02CE 


SAVEY 


02E2 


SKIP HI 


0279 


SPACE 


02D8 


SPACE2 


02D5 


START 


02DC 


TBYT 


02B8 


TESTPGM 


02 IB 


TSTPTRN 


02E0 


TSTTYPE 


02E1 


WRITfi 


02CB 











Datasheetservice . 

Een van de voorstellen op de laatste 
ledenvergadering was^ om binnen de 
club een datasheetservice te 
beginnen. In principe kunt u voor 
een kopie van een datasheet contact 
opnemen met Nice de VidLes (zie 
voorin dit nuiraner ) . 

Hij zal trachten het gevraagde 
dataiftoi^^ #p t# ©poreii^ en het tegen 
een redelijk bedrag te kopieren. De 
voorgestelde gang van zaken is 
voolrl«3^plg: bel Nica mp mfi #(gi!%^Bl wat 
u hebben wilt. Nico zoekt uit, 
hoeveel pagina's het datasheet lang 
Lb, en belt/schri jft u teriig met de 
verwachte kosten. Na overmaking van 
het bedrag ontvangt u vervolgens het 
gefcopieerde datasheet. Het origineel 
gaat in een bibliotheek en in een 
catalogus waaruit de leden kunnen 
putten . Waarssehijnlijk zullen de 
kosten fl. 0.10 per pagina zijnv 
vermeerderd met de portokosten. 

Win^mmmmm kunt u op deze manier in 
het bezit komen van de catalogus van 
voorradige datasheets. 



Attentie; Contributie voor 1988. 

U vergemakkeli jkt de taak van de 
penningmeester enorm^ door tijdig de 
eafffeributie voor het Ver en igingsjaar 
1988 over te maken. Gebruik hieifVpai: 
bij voorkeur de u tpegezonden ac- 
ceptgirokaart . Mocht n geen kaart 
ontvangen hebben^ of hem kwijt zijn, 
maak de contriimtle (hfl« 50.-) dan 
over op: 



Post bank 
t .n.v* 



rekening no. 3757649, 



KIM-Gebruikers Club Mederland 
Itrimpen a/d IJssel. 

Attention; Membership-fee for 1988. 

Please pay your members hip- fee for 
1988 as soon as possible: this will 
ensure the timely delivery of the 
first issue of ttfeiif n^gazins in the 
next year. If you are living outside 
Holland or Belgium, the fee is hfl. 
59.50. The easiest way of paying is 
sending an Eurocheque for the amount 
specified above to: 

J. vsan Sprang 
Tulp 71 

NL-2925 EW KRIMPEN A/D IJSSEL 
The Netherlands 
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DATUM ~ - :> W E E K D A G C 0 N E R S I E 



/Ik 

De hitr be^ef4f#v#n r#itifiitt Miiiiwit f#bFuikt warden om uxtgaatnd© 

van de datum de bijbehorende dag in'de week, het weeknurwner 

van de datum en het Jaar waarin de bepaalde week valt te bepalen. 

Als bijprodukt bevat dit pakket een functie waarmee het aantal 
dagen tussen twe# data bepaald kan won den . 

Auteyf s 6. van Opbroek 

Bateweg 68 

2481 AN WoubruQQe 

Versie: 1.8 - 8 oktober 1987 



N,Ba Wie helDt mij aan een al gori tme voor het berekenen van 

de paasdaqen? 



Ik/ 



Minclude <=.tdio.h> 
Minclude <strings.h> 

/I MMJm^mi 

Par ameters : dag ,maand , jaar 

Returns: Daqnummer 

V 

int DAG-.FAC1tSitai(g ,iiiaand , J aar) 
int dag, maand, jaar ; 

/I 

In dagf actor wsrrft lan tfe liyftN/^rde datum cfagnMttfRtr 
toegekend. Door dit dagnummer modulo ? teiiiften, krijgen 
we een getal dat de dag in de week aangeelt, Hlerbij hee-f t 
#e iCNfidif code 8 . 

Het verse hi 1 tussen de dagnummer s van twee data gee^t het 
verschi 1 in da^en tussen deze twee data* 

Om eventueel in een inteQer-2 -formaat te kunnen werken, is 
het nulpunt van de dagnummers in 1985 gelegd. Dit hee-ft 
echter qeen ffyilgill d# Ifri^tfiing yifl dit# %wr 

deze datum. 

«/ 

C ■ ' ' 

int -fact 1 ,dag- "factor \ 

f^ttl * 3^ « <jatar - i ^ iig + si » (matnd - i) | 

if <maand 2> 

da9-.factor = -fact! + (jaar - 1) / 4 - /'i Schr ikkel jaren ^/ 

3 ^ ((jaar - 1> / 180 + 1) / 4; />; Eeuwjaren 'i/ 

else 

dao-factor = t'actl - (4 maand + 23) / 10 + 

jaar / 4 - /Ik Schr ikftl jiren 5f/ 

3 ^ <jaar / 100 + 1) / 4; /Ik EeuwjartW i/ 

return (dag^ -factor) ; 



4 0 



££b J U l1 kenner algemeeim 



/X DATUrO«JEEKNR5 

Ptrara#|#r s t daq ,maand , j aar 

Weekdag (pointer) 
Returns : Weekntmner 

i n t DATUM^WEEKNR ( dag ,roaand , j aar , weekdag) 

int da9,maand, jaar ; 
int ^weekdag ; 



{ 



Deze funttie beptilt bij een datum het weeknummer in h#t 
huidige, voorgaande oi volgende jaar. In de parameter "weekdag" 
wordt de code voor de dag in de week teruggegeven , Hierbij 
telt de maandag als eerste dag in de week." 'v'oor de bepaling 
van het weeknummer is het aantal donderdagen sinds 1-1 bepalend. 



int k1ad,kiidl,klad2,c0rrectie,kTad-we^^^^^ ; 

klad = DAG-FACT0R(1 , IJaar) ; /'i Bepaal de dag waarop il/tl viel X/ 
cc^rrectie = 4 - <klad X 7 + 7) X 7; /X Oag^actor kan < 8 lijn 1/ 

/* Corrigeer voor Bl/il m ^-f na donderdag If/ 

if < c or rec tie < 0) 

correctie = 0 ; 

el &e 

correctie » I i 

/* Bepaal htt aantaJ weken sinds 01/81 */ 

klad2 = DA6^FACT0R( dag. mamd, jaar) ? 
klad = klad2 / 7 - klird / 7 ; 

/J{ ieptil dt huidige weekdag en corrige^r eventueel voor de zondag X/ 

klad2 = (kIddZ '< 7 4 7) % 7j /¥. Daqfactor kan < y zijn ^/ 

i-f (kladZ == 0) /'i Zondag -> verlaaq het weeknuiwier ^/ 

{ 

klad— J 
kUd2 = 7 ; 

} 

Jiweekdag = klad2 j 

/* ieschouw een uitkomst week 53 apart: M/ 

if (klad + correctie ~ 53) 
{ 

kladl = < DAG-FACTOR < 1,1, jaar + 1) X 7 + 7) 7, 7 \ 
if (kladl < 5) /% 2o, ma, di, wo »/ 

return( 1) ; 

else /X do, vr, za X/ 

return (53) ; 

} 

else 

k^oor week 0 geldt: dit is dezelfde week als af gel open 31/12 X/ 

if (klad + correctie == 8) 

return<DATUM_WEEKNR':31 , 12, jaar - 1 ..^k 1 ad^weekdag) > ; 

else 

return(k1ad + correctie) ; 
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/X CONMERTEER-DATUM: 

Pltrtrnetipss Datum in dd/tm/jJ of dd/mm/jj44 -fornidat 

Datum in dwwJJiJ • -fari^ttt 
fitturnsi 1 datum bestaat; 0 datum be#timt niei 

int C0NMem"EE}i.DATUM<4atum»c-da^^^^^^ 

char datum[] ; /X dd/mm/jj oi dd/mm/jjjj -formaat 
char G-datumll ; /X d»*jijj -formaat ^/ 

i 

int dag^maand, jaar ; 

int week,weekdag ; 

int i ? 

/i Formaat -con t ret 

i-f <strlen<datum) != 8 ick sir 1#n(datum) 18) return<8) i 

•for <i = 6 ; i < str 1 en<ditum3f 5 i++> 

{ 

i-f <i != 2 1 '= 5) 

i-f (datumCi] < * 0 ' il datumEi] > '9 ) returnO) ; 

} 

©1 se 

i-f <datum[i] != '/ ) returnee) ; 

/If Conversie naar dao, maand, jaar 5C/ 

dao = 10 * (datum[0] - + dltuWflJ - "1' : 

maand = 16 i <datum[3] - '0') + datumC43 - 'B' ? 
jaar = 10 ^. (datum[6] - '0') + datumL?] - 'B' s 

i4 vdatumtSJ '\B/> 
jaar = Iff 51 Ji» + 

18 % <datum£83 - '0') + datumt?) - ^0' ; 

el se 

jaar -^^ lf«8 ? 
/i« £?OfvtroTe o-f de datum bestaat ^/ 

ii (daq < II! dao > 31 |; 
maand < 1 ! J maand > 12 ^ ^ » ' 

dag > 30 Uc <maand ==211 maand ==41! maand == 4 n 

maand ==911 maand 11) * » 

dao > 28 Mi maand == 2 'icirf 

DAG-FACT0R<iiir«6«i^tfti««?'> 

DAI^FACT0R<1.3ijaar>) 

return<0) : 
Conversie 1/ 
w#et( s= OftTlilJ4iEI^<da 5 

if <week > 50 «c& maand < 2) /* Week 52 o4 53 van vori© jaar X/ 

elft^ir<week < 2 Me maand > 11) /* Weeis I ^^an volQtnd jaar X/ 
jaar++ ; 

c-.datumC0 3 = weekday ^ '9' I 

C-datumE 13 = ? 

c-datum[23 = week ./ 10 + '0" ; 

c^datumCS] = week % 10 +^0' ; 

c-,datuml4] ^ J 
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■for (i = 8 ; i 5 ; i — ) 
{ 

c^datumCi] = Jaar V, II 4 '0^ 
jaar = jaar / 16 ; 

} 

c-datum[9] = 'Xe* ; 



mainO 
{ 



char datum[ 103 , dmjJUtSl ; 

Wini4i^%we4 de datum <dd/nm/Ji of dd/nm/jj jj) t ") ; 

while (5can+*("Xs" , datum) != EOF) 
{ 

i i < COWERT EER^DATUM ( da t um , dww j j j j ) > 
{ 

print-fC'De geconver teerde datum is : MsXrk" ,dwwj j j j) i 
printfC'De datum valt op een "> ; 

swi tch (dwwjjjj C9 3) 
< 



cast 



case 



case 



case 



case 



case 



' 1' : 

printf < "maandag \n"> : 
break 5 
2 : 

print-f >; "dinsdag \n") 5 
break ; 

print-f<*woensd|i9 \n") ; 
break ; 

■ 4 • : 

pr in t-f< "donder dag \n") ; 
break i 

pr i n t -f < "vri j dag \n " ) : 

break | 

- ' 6-' : 

pr ] n t + ( " la ter dag \n " ) 5 
break ; 

orint-f Czondig \n") ? 
break ; 



} 

else printt< "On.juiste datum \n") i 

print-f < "Geef de datum Cdd^ii^''jj of dd/mm/jjjj> : ")? 



Net als vxmw Am Ocrt^pmsg^/lCJSl i# 
behoefte aan iemand die de in de 
club aanwezige Junior-software op 
cassette gaat catmloglserien en 
beheren. Als u hiervoor 

belangstelling heeft^ neem dan even 
coixtact op met het liestuiir. Alvast 
bedankt . 



Steafici zaken bulletinboard , 



Tijdens de ledenvergadering heeft 
isfefi #eii fcaifdidaat gemeld voor de 
functie van sysop voor het 
bullet inboard. Zijn naam is JacgLi#0 
Banser. Verder heeft het besttitir 
inmiddels een IBM/PC-kloon met harde 
schijf aangeschaft. We hopen in de 
loop wmm jaauari 1988 te kunnen 
starten* Meer in het vojlbf^nde 
nummer . 
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Spreekbeurt EPROMs programmeren, 

Hieronder is de tekst afgedrukt die 
is uitgereikt bij de spreekbeurt 
over het prograiraneren van EPROMs . De 
spreekbeurt werd. gehouden door Nico 
de Vries op de bijeenkomst van 19 
September jongstleden te Haarlem. De 
aanleiding tot de spreekbeurt was 
het gereedkomen van de 

EPROMprogranimer EP en de software 
hiervoor . 

1. Wat is een FET en hoe werkt zo'n 
ding? 

In afbeelding 1 is het 

schemasyinbool van een zogenaamde 



gate vormt met het kanaal een 
PN-overgang ofwel een junctie^ 
vandaar de naam jttiietlon-FET. Zoals 
misschien bekend, is een PN-overgang 
miets anders dan een diode. 

In nomiaal bedrijf wordt de PET 
zodanig gebruikt, dat de gate- 
kanaaldiode in sper staat. Er loopt 
dan ook geen stroom in de gate,, of 
anders gezegd: de FET is 
spanningsgestuurd . 

Sluiten we de source en de gate 
kort, zodat de gate-source spanning 
(U j nul volt is, dan heerst er 
r oni de gate geen electrisch veld* 
Het N-silicium is een geleidend 
materiaal , zodat er een stroom 
tussen drain en sotaree kan lopen . 




N-silicium (kanaal) 



[ I uitputtingsgtbicd (grenslaag) 



d = drain = afvoer 
s « source « bron 
g « gate « poort 

Schematische voorstelUng van een gr^istaag^FET 



junction-FET (kort: JFET) getekend. 
FET betekent: Field Effect 

Transistor, of in gewoon Nederlands : 
Veldef feet transistor. 

De FET is als volgt opgebouwd. Het 
belangrijkste deel van de FET, het 
kanaal, wordt gevormd door 

N-silicium. Dit is silicium dat 
verontreinigd is met 5-waardige 
niaterialen, zodat het een overschot 
aan vrije elektronen heeft. Dit 
N-siliciiOT is elektrisch geleidend • 
Aan de uiteinden van het kanaal 
vinden we de drain en source 
aansluitingen. De source is de bron 
van electronen, de drain voert ze 
af. De elektronenstiroom loopt dus 
van source naar drmiti* Pe i^rkelijks 
stroom loopt dus van drain naar 
source • , , 

Het kanaal is verdl#i: ds zxjJl^* 

voorzien van een elektrode, die van 
P-silicium gemaakt is. Deze 
elektrode wordt de gate genoemd. De 



of 



Het blijkt dat deze stroom een 
maximum waarde heeft, die alleen 
bepaald wordt door het beschikbare 
aantal vrije ladingsdragers 

(elektronen) in het kanaal. Deze 
stroom is dus onaf hankeli jk van de 
spanning over het kanaal. De FET 
gedraagt zich in deze toestand dus 
als een stroombron. De 

verzadigingsstroom wordt ^dSS 
genoemd. 

Maken we de gate negatief ten 
opzichte van de source, dan ontstaat 
er een electrisch veld in het 
kanaal. Dit vUld drifft een deel van 
de vrije electronen weg uit de buurt 
van de gate, waardoor het nog 
geleidende deel van het kanaal 
smaller wordt . Hi erdoor n0eiBt de 
weer stand van het kmnaail toB, 
waardoor er mim4«8^Jr stroom gaat 
lopen. 

Dit negatief maken van de gate 
kunnen we voortzetten> totdat het 
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P-silicium 
(bulk of substraatl 

N -silicium (kanaal) 

N^- silicium 
im («afishiitlfig«n) 

I I SrOj (iiolmtor. zetr dun) 



dsirain. 



b wordt soms nict mtt $ vtrbondftn 
9 « ggtf . i« s0ure#. b s substmaikflii%l 



veld rond de gate zo sterk is^ dat 
alle #l©efci:^iien uit het kanaal 
verdreven worden . Op dat moment 
loopt er geen stroom meer dooi: het 
kanaal ? of anders gezegd: de FET 
staat afgeknepen. De gate- source 
spanning waarbij dat gebeurt heet de 
piBoh-of f spanning^ of Up. 

2. De FET met stacked (gestapelde) 



Tot dusver hebben we het alleen 
maar (cwer standaard JFETs f^^iiaid* In 
EPROMs wordt een variant op de 
standaard FET gebruikt^ namelijk de 
HKiWf fHOg h^^^tlm^ li©tal Oxide 
Screen). Deze FETs hebben een andere 
gate-constructie. Tussen de 
dite mee#tal van metaal 1®, 
laag je Siliciumoxide 



aangebracht ^ 



gate , 
is een 
(SiO ) 

dat zeer goede 
isolatie^i^^ttsehappen heef t . De 
werking van deze FETs is gelijk aan 
die van de JFETs met dit verschil 
d[d% 'BT in tefe g^en ste^diti in 

de gate loopt. Verder leent deze FET 
zich zeer goed voor integratie in 
ICS . De FETs in een EPROM zijo 
vrijwel altijd van het MOS-type^ en 
hebben een extra groot 

isolatiegebied in de gate,, waarin 
een geleidend deel silicium is 
opgesloten. 

Het is nu mogeli jk^ de pinch-off 
spanning te verschuiven^ en wel door 
een permanent veld(je) aan te 
brengen. Dit gebeurt, door in het 
geleidende gebied een lading aan te 
brengen. Omdat het materiaal om het 
gebied een goede isolator is , kan de 
lading niet weglekken en zit dus 
opgesloten. 



Als er geen lading is aangebracht, 
dan hebben we met een gewone FET te 
makefi, d.w.z. d# FET geleidt bi j 
U =0 en spert bij U^. 

Brengen we echter een negatieve 
lading aan in het ge soleerde gebiad 
in de gate, dan verschuift de waarde 
van de pinch-off spanning naar 
boven , omdat het veld dat door de 
gate wordt opgewekt wordt opgeteld 
bij het reeds aanwezige stationaire 
veld. De aangebrachte laditig kan zo 
groot worden dat de pinch-off 
spanning zelfs positief wordt. In 
dat geval staat de B*ET dus 
afgeknepen als U^^ nul volt is. 

Omdat de gate nu bestaat uit een 
stapeling van de aans luit litg , een 
laagje oxide, een laagje geleidend 
silicium en weer een laagje oxide^ 
worden dergeli jke FET^ wel stacked 
gate FETs ( ^^gfestapelde gate 
FET ) genoemd . 

3. EPROM-opbouw . 

Zoalii reeds gezegd, bestaan de 
geheugenelementen in een EPROM uit 
FETs met een gestapelde gate. ledere 
FET stelt 1 bit in de EFMOM voor . De 
gates van de FETs zi jn verbonden met 
de adresdecoder in de EPROM. Alle 
sources liggen aan de nul, en de 
drains zijn steeds in stellen van 
acht met de databusbuf f ers 

verbonden . De adresdecoder activeert 
de acht FETs die bij een bepaald 

door 



adres horen , 
nul te leggen. 

geselecteerde FETs 
een negatieve 
chip gemaakt 



de gates aan de 
Van de niet 
ligt de gate aan 
spanning, die op de 
wordt (door de zgn. 



substraat bias generator). Alle 
niet-qeselecteerde FETs blijven dus 
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altijd gesperd. Van de geselecteerde 
FETs bepaalt de lading in de gate of 
ze wel of niet gaan geleiden, of in 
andere woorden: of er wel of niet 
een nul op de databus verschijnt* 

4. Prograinmerenr fysisch* 

Nu is het natuurlijk de vraag^ hoe 
we die lading achtei: de gates 
krijgen. Dit gaat betrekkelijk 
eenvoudig. Als de EPROM gemaakt 
Wprdt, is de opgeslagen lading jpiul. 
Pe FET geleidt dus als hij 
geselecteerd wordt. Het aanbrengen 
van de lading geschiedt door het 
aanleggen van een (relatief) hoge 
spanning tussen de drain en de gafc^ 
van de FET. Hierdoor treedt doorslag 
op, waardoor een aantal electronen 
^aar het ge sole^rde deel kiinnen 
stromen. Als de spanning weer wordt 
weggehaald kunnen de elektronen 
#dlrt^ wAmt weer weg, ze zitten 
opgesloten, en de FET blijft nu 
afgeknepen als U„ nul volt is. Het 
n^fcisriaal feissesn arain en gate is 
zodanig gemaakt^ dat het 

doorslagproces geen blijvende schade 
aanricht. Wel is er sprake van een 
zekere 'slijtage' waardoor de EPROM 
niet een oneindig aantal keren 
gepr^grainineerd kan worden. 

De relatief hoge spanning is de 
programmeerspanning. Omdat de laaten 
op ^li^mlvewa in mi^^rons worden 
uitgedrukt, zal het duidelijk zijn, 
dat doorslag al optreedt bij enkele 
t lent alien volts . In de prakti jk 
ligt de prograinmeerspamiiiig titissen 
12.5 en 25 Volt. 

De iir^r^BttRiiei^p^ls schakeit: de 
programmeerspanning naar de te 
programmeren FET(s). De duur van 
deze p«l.s b^aalt dus, hoeveel 
elektronen^ of anders gezegd^ 
hoeveel lading er onder de gate 
^ gescrliot en ■ wordt » 

Merk op, dat er bij het prograimneren 
nergens sprake is van verbranding of 

uitdrukking EPROMs 'brailden' iM tot 
ook volkomen onjuist. 

5. Wissen^ fysisch. 

ledereen is wel op de hoogte, dat 
EPROMs ook weer gewist kunnen 
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worden. Dit gebeurt op de volgende 

De EPROM is zodanig geconstrueerd, 
dat de gates van de FETs aan de 
bovenzijde l^ii de chip zitten. Onder 
de gate zit het ge soleerde deel, 
dat de lading kan bevatten. Door de 
gmte nu te bt^barderen met deelt jes 
met een hoge energie, slaat deze bij 
dit bombardement steeds even lek. 
Hie^rdioor vloeit een klein deel van 
de lading onder de gate weg. Nu is 
licht ook een deelt jesstroom, en 
UV-licftat licht met e#n b#gere 

energie-inhoud . Vandaar dat EPROMs 
gewist kunnen worden door ze met 
pp^lieli* te beschijnen. Om 

t3»§t/0hi jning van de chip zelf 
HHp^elijk te maken, zijn alle EPROMs 
voorzien van een , wmm&^mm wmn 
ImaM^^^glmm Ln het huis je. 

6. EPROM progrcimmeren . 

Het programmeerproces zal nu 
ininiddels duidelijk zijn geworden: 
de programmeerspanning zorgt ervoor, 
dat er doorslag tussen drain en gate 
van de in de EPROM kan 

optreden, terwijl de lengte van de 
programmeerpuls bepaalt, hoeveel 
lading er onder een gate verdwijnt. 
Het gemak waarmee de drain-gate 
overgang doorslaat bepaalt ook 
hoeveel lading er per eenheid 
programmeerpuls onder de gate 
verdwijnt, en ook hoe gemakkelijk de 
EPROM weer gewist kan worden. De 
kwaliteit van de isolatie rond de 
gate bepaalt hoelang de EPRQM de 
geprogrammeerde data vast kan 
houden. Naarmate de isolatie 
slechter is, vloeit er ineer_lading 
weg. In de prakti jk it bmt een en 
ander zo uitgevogeld^ dat een EPROM 
die op de julst;# manier 

geprogramnie^rd is, iite 4*ffeli tenminste 
10 J^i^r 3mm wkmtkmsMm^m 



Het programmeeralgoritme dient 
zodanig in elkaar te zitten^ dat er 
een zodanige lading onder de gate 
wordt aangebracht, dat de EPROM de 
data tenminste 10 j>^ar vast kan 
houden. Het aanbrengen iiran te weinig 
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lailiiicr iNi^fcort deze tijd; tre^e^l 
lading echter betekent onnodige 
doorslag (hierbij treedt slijtage op 
in lie* niateriaal) en odk een langere 
wisti jd. 

De eerste algoritmen zijn nogal bot 
ap dit punt . leder te programineren 
adres ontvangt een puis die zodanig 
van lengte is dat de slechtste FET 
flog- betrouwbaar geprograiiinieerd 
wordt. Bij de oudste EPROMs is de 
lengte van de programineerpuls dus 
^j^^ en bedraagt 50 milliseconde. 
Vrijwel alle 2716's en 2732 's moeten 
op deze manier geprograniineerd 
Warden . 

Intel, de uitvinder van de EPROM, 
kwam in het begin van de jaren '80 
met een algoritme dat zodanig in 
elkaar zit, dat iedere FET in 
principe de juiste hoeveelheid 
lading krijgt toegevoerd. Het 



algoritme programmeert meerdere 
malen met teodrfee pulsjes van 1 
milliseconde, totdat de 

geprogrammeerde data uit de EPROM 
kunnen worden teruggelezen. Op Itet 
moment is de pinch-off spanning van 
de te programmeren FETs zodanig 
verschoven, dat deze jnist 

afgeknepen staan als ze geselecteerd 
worden. Het tot dusver benodigde 
aantal pulsjes wordt vervolifls^]^ niet 
drie vermenigvuldigd. De FETs worden 
nu overgeprogrammeerd met een puis 
die de drievoudige pnlsdnur heeft 
van de tot dusver toegevoerde 
pulsduur. De FETs bevatten nu een 
redelijk nauwkeurig bepaald 

overschot aan lading, die ^rvoor 
zorgt dat de pinch-off spanning ver 
genoeg boven nul volt li^p.. mit 
algoritme werd door Intel het 
inteligent algoritme genoemd. Het 
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iimrd voor het eerst t:o#g^gpisfe €ip lie 
2764 EPROM. 

Door het voortschri jden der 
techniek worden EPROMs steeds befcer^ 
dat wil zeggen dat er steeds minder 

lading onder de gates inoet worden 

op^|€N^ i. a gen cm 

i»<B^aartijd te verkrijgen. Hierdoor 
dmalt in principe de pulsduur van de 
prt5graaw^w^€piftls • Ook worden de 
isolatie-eigenschappen van de gates 
steeds beter. Hierdoor wordt de 
isolatielaag rond fitt# fcl^iner^ 

en daarmee da^lfc ook de 

programmeerspanning. ^andaar dat 
nieuwere versies van bestaande 
EPROMs soms met een lagere 
programmeerspanning geprogrammeerd 
moeten worden. 

Dit alles heeft geleid tot een 
eveneens door Intel ontwikkeld 
algoritme , dat uitsluitend bij 
EPROMs met 12.5 Volt 

programmeerspanning wordt gebruikt, 
Dit derde algoritme gebruikt pulsjes 
van slechts 0.1 milliseconde . Het 
programmeert net als bij het 
inteligent algoritiwe net zo lang, 
totdat de geprogrammeerde data 
teruggelezen kan worden. Bij de 
nieuwere EPROMs zijn de toleratities 
al zodanig^ dat een 

overprograimeeractie niet meer nodig 
is . Dit nieuwste algorifeDii is dan 
ook zeer snel. Het wordt het Quick 
Pulse algoritme genoemd . 

#. Blokschema EP. 

De EP-hardware is opgebouwd rond 
een VIA en een PIA, die op de 
normale manier met de CPU veirbonden 
zijn. De PIA levert de adressen vbof^ 
de EPROM ^ de ene helft van de VIA is 
verbonden met de datalijnen van de 
EPROM. De andere TIA-helft l&^mrt 
een aantal sifnalen die dienen voor 
de besturing van de EPROM, waaronder 
schakelsignalen voor de voedings- en 
prograrameerspanningen . 

Om de diverse typen te kunnen 
prograiraneren zonder mechanische 
omschakelingen zoals jumpers of 
relais is een EPROM gebruikt . Op de 
adreslijnen van deze codeerEPROM 
worden de diverse stuur signal en 
gezet , samen met een code voor het 
onderhavige EPROMtype . Door de EPROM 



nu slim ^roq^mmmimmf 'Wmmm^a^atirjimmm 
op de datalijnen direct de gewenste 
signalen voor de diverse pinnen op 
de EPROM prograjinneervoet . 

Een aantal pinnen op die 
programmeervoet vereisen wat meer 
dat alleeft «PFIi«signaleil. Dit ssijii 
bijvoorbeeld de voedingspinnen en de 
pinnen waarop de programmeerspanning 
kan voorkomen . Deze pinnen worden 
vanuit de codeerEPROM gestuurd via 
L200 instelbare spanningsregelaars . 
Voor de keuze van Jle 

programmeerspanning is een zelfde 
weg bewandeld als voor de signalen: 
een PROMmet je. Door de codeerElWaH 
en de PROM opnieuw te programmeren 
kan de hardware eventueel worden 
aangepast aan nieuwe type^t. ^ ©e 
huidige versie van de hardware is 
geschikt om de volgende typen te 
programmeren : 

2716 2732 2732A 2764 
2764A 27128 27128A 27256 
27256A 27512 2532 2564 

Aan een uitbreiding om bok de 

EEPROMs 2804, 2816, 2864 en 28256 te 
kunnen programmeren wordt inmiddels 
gewerkfe* 

''.I 

9. Software EP. 

De software wekt het 

programmeeralgoritme op^ leest en 
verif ieert EPROMs , en test of ze 
leeg of programmeerbaar zijn. De 
EP-sof tware werkt met 1-letter 
comniando ^ s • De volge^TOie 

moge 1 i j kheden zijn aanwezigs 



B 


zet de adresgrenzen voor RAM en 




EPROM 


c 


reken de checksum van de 




Rj^^diata uit 


D 


kies een EPROM type 


E 


kijk of de EPROM leeg is 


I 


stel een nieuwe adresstap in 


M 


spring naar MON65 


P 


T + prograrameer een EPROM + V 


Q 


verlaat de software, terug naar 




DOS 


R 


lees een EPROM in RAM 


S 


laat de EPROMinhoud zien zonder 




RAM te laden 


T 


test of de EPROM 




programmeerbaar is 
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V vergelijk EPROM- en RAMdata met 

De software is in staat de drie 

meest gangbare algoritmen op te 
wekken: 50 ms^ inteligent en quick 
pulse. Verder zijn de parameters van 
het inteligent algoritme eenvoudig 
te veranderen vanuit MON65. 

De adresstap Immt toe, ook met 16- 
en 32-bAt data te t«erken. 

EP is ciit Snaoroent alleen 

beschikbaar voor DOS65. Er is 
inmiddels iemand bezig het om te 
sGhri j^PMi mmmr OMOHDOS* 



Het blijkt, dat de 

pos itloneersfeqtience ( ecmt rol-^T |^ 

gevolgd door de gewenste 

coordinaten) niet altijd goed werkt, 
als dit via de standiiafrd §()S-routiri# 
CHROUT geschiedt. Dit komt omdat DOS 
een aantal karakters uitfiltert. Zo 
werkt bijvoorbeeld een positionering 
op 13,13 niet goed. De oplossing is, 
om niet de DOS-entry voor CHROUT, 
maar de I065*^ntry te gebruiken. odk 
kan de speciale entry POS, eventueel 
gevolgd door UNPOS^ (beide in 1065) 
gebruikt worden. Deze werken altijii 
goed • 



Harddiskcont roller • 

Er zijn wat plannen, om een 
harddiskcontrollerkaart te gaan 
ontwikkeliBii voor de llektntmrb^s * ©e 
kaart zal worden opgezet rond de 
Western Digital chip WDlOlO en is 
bedoeld voor de pseiido— standaard 
interface ST506, waarmee de meeste 
gangbare drives zijn uitgerust. Laat 
eens weteii of m Ixiervoor eventueel 
belangstelling heeft* 
N. de Vries. 

Status van de EBRQMy>roqrammer , 

De eerste proefprifit is klaar en 
wordt thans volgebouwd. Als alle 
bugs eruit zijn^ wordt de kaart in 
productie genomen. Omdat de kaart 
enkelzijdig is geworden kan hij voor 
een bescheiden prijs worden 
aangeboden. In totaal bestatat Kf uit 
twee printen: de eurokaart met de 
electronica^ en een klein print je 
de ZIF-voet. Inmiddels is Ton 
Sioits begonnen de software om te 
schrijven naar OHIO-DOS^ zodat 
gebruikers van dit DOS ook aan hun 
trekken kunnen komen. 

De club zal ervoor zorgen, dat de 
PAL en de PROM die in de schakeling 
voorkomen geprogrammeerd en wel in 
combinatie met de print zullen 
kunnen worden gekocht. Meer 
definitief nieuws in het volgende 
nuimner. Als u haast heeft^ belt u 
N4S17454 (Nico de Vries). 



Voorlopiqe bi jee^kQaistenaqenda 1988^ 

Onder voorbehoud zullem dit de 
plaatsen en data zijn waarop de 
bi jeenkomsten zullen worden 

gehouden s 



Krommenie 

Geldrop 

Krimpen a/d 

IJssel?? 

Haarlem 

Almelo 



16 januari 
19 maart 
21 mei 

17 September 
19 november 



Wij streven ernaar u 

bijeenkomst een aantrekkeli jk 

programma te bieden. Suggesties voor 
tii^^iia^s voor bijeenkomst^ zijn 
steeds welkom. Indien u een 

spreekbeurt wilt verzorgen kunt u 
dit bij het besftiiiii: aa^MBtelden. 

Wie organiseert er een bijeenkomst 
in Belgie?? 



On an empty disk, you can seek 
forever 

Korte cursus Vlaams : 

The system has crashed - 

Uw machien is de natuur in, of: 

Uw machien is in panne gevallen* 

Indirect addressing: 
onbereikbaar adresseren 
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Database for the BBC model B, 



Cter club-member H.K. Hemminga has 
db^lc^pfe€ m mimplm ii^tabase system 
for the BBC model B micro computer* 
Here are some quotes from the 
#p^ffflieiitatioii we received froin him. 

mat is SIDAP? 

SIDAP is an acronym for Simple 
Indexed Data Package that enables 
th^ BBG HiicfTO eMttpetet* e^q^ifiped with 
a floppy disk drive to access 
datasets (files) indexed by an ASCII 
key . 

Hard- and software requirements 

SIDAP is designed to work on a BBC 
model B (32 kbyte RAM) microcomputer 
fitted with BB^ OS 1 . 2 or higher and 
the BBC DFS (disk file system), 
which can be either single or dual 
density and use either 40 or 80 
tracks disk drives . 

ThiB application programs written in 
BM16 can simply CALL SIDAP with 
some parameters that specify the 
function requested and the BASIC 
variables involved . 

nmMM features of SIDAP 

SiDiLP has the following features: 

1) Smiport for up to five indexed 
datasets open simtiltafieously . 

2) Key lengths from 1 to 82 bytes 
of almost any ASCII value. 

3) Data record lengths up tm 2S5 
bytes subdivided in fields. 

4) A SIDAP dataset is simply a BBC 
file, which can be copied etc. 

5) Fast access through the use of 
an integrated MASTER INDEX with 
BITMAP. 

6) The datasets never need 
reorganization , thii is 
realized by comprehensively 
using th# index and data areas. 

7 ) The error handling is well 
defined to ensure that %he 
integrity of the dataset is 
maintained . 

8) It is written in assembler tm 
assure speed and minimal memory 



requirements . 

9) It is supported by a service 
program that is easy to use. 

List of snn^pHOrted functions 

The online data manager of SIll&P 

supports the following functions: 

'O' Logical Open the dataset. 

'C Logical Close the dataset . 

' I ' Get information about the 

number of records in the 

dataset. 

'S' Start notless by key or qBnml^ 
key^ no data is returned. 

'R' Read by key or generic key. 

'W Write new key and associated 
data. 

'U' Update the data by key. 
'D' Delete the data by key. 
'F' Read the First record of the 
dataset. 

'N' Read the Next record of feh^ 
dataset. 

'V Read the Previous record of the 

dataset . 

'L' Read the Last record of the 
dataset. 

Package contents 

The package consists of: 

1) Online dataraana|er (written in 
6502 assembler) in object fdrm. 

2 ) A service program (written in 
BBC BASIC and assembler) . 

3 ) Documentation . 

How to obtain SIDAP free of charge 

The SIDAP package can be obtained 
free of charge and under no 
warranty: 

Send an audio cassette and a self 
addressed, stamped envelope to: 

H.K. Hemminga 
Hoofdweg 152-3 
NL-1057 DB Amsterdam 
The Netherlands . 
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VERZEKERING VAN PERSONAL COMPUTERS 



Verzekerd kunnen worden d^ micro-computers, bestemd voor prive gebruik. 

Deze apparatuur is ook buiten de woning of de bedr ij f sruimte verzekerd. 
De verzekering is namelijk van kracht in de Benelux en West-Duitsland . 



VERGOED WORDEN: 

1. schaden aan de apparatuur veroorzaakt door: 

- brand, ontploffing en kortsluiting (incl. eigen gebrek) 

- een van buiten komend onheil. 

2. verlies van de apparatuur door diefstal. 

- diefstal van de apparatuur buiten het in de polls 
genoemde pand is verzekerd na braak. 

3. de bereddingskosten die zijn gemaakt tot vermindering 
van schade aan de apparatuur. 

4. de opruimingskosten tot 10 % van de op apparatuur 
verzekerde som. 



SCHADEVERGOEDING 

De reparat iekosten worden vergoed: 

Bij totaal verlies wordt de nieuwwaarde uitgekeerd. De vergoeding geschiedt 
echter naar dagwaarde indien de waarde minder dan 40 % van de nieuwwaarde i 



NADERE BIJZONDERHEDEN 

De verzekering wordt gesloten voor de duur van 1 jaar en wordt stilzwijgend 
verlengd voor dezelfde termijn. 

De premie voorwaarden worden op aanvraag verstrekt voor: 

- apparatuur die in beroep of bedrijf voor andere dan administrat ieve 
doeleinden wordt gebruikt . 

- apparatuur in gebruik bij onderwij s ins tellingen en verenigingen. 



LET OP ! ! 

Leden van de Kim gebruikers club nederland betalen geen poliskosten. 

INLICHTINGEN: ADMINISTRATIEKANTOOR A. METZLAR 
VOORBURGGRACHT 479 
1724 RH OUDKARSPEL 
TEL. 02260-16889 



TECHNITRON TLP-12 MSER PRINTER 

- UHEEFTEIGENUJKGEENANDEREKEUZE! 




■ 12 pagina's per minuut (max.) 

■ tot 10.000 afdrukken per maand 

■ 8 ingebouwde lettertypes; 
32 afdruk-combinaties 

■ unieke "FontMaker" service 



■ unieke "FormsMaker", 
formulier- en logo service 

■ 3 ingebouwde hardware- 
emulaties 

■ flexibele in- en uitvoer van papier 



Technitron 



DATA 



Technitron Data B. V. 

Zwarteweg 110, Postbus 14. 
1430 AA Aalsmeer 
tel. 02977-22456 
telefax 02977-40966 
telex 13301 



Vestigingen in: 

BONDSREPUBLIEK DUITSLAND - DENEMARKEN - ENGELAND - FRANKRIJK - ITALIE - NOORWEGEN - VERENIGDE STATEN - ZWEDEN 



